Commit ee9a35ac authored by Karsten Poeck's avatar Karsten Poeck
Browse files

Include drmeister changes for parallel compilation

parent 56153150
...@@ -767,9 +767,11 @@ it will filter them appropriately." ...@@ -767,9 +767,11 @@ it will filter them appropriately."
(when (probe-file temp-dwarf) (when (probe-file temp-dwarf)
(rename-file-overwriting-target temp-dwarf target-dwarf))) (rename-file-overwriting-target temp-dwarf target-dwarf)))
;;; need to rename the bc or ll file as well or test-bundle.script fails ;;; need to rename the bc or ll file as well or test-bundle.script fails
(rename-file-overwriting-target ;;; They might not exist with parallel compilation
(compile-file-pathname tmp-file :output-type :bitcode) (let ((bitcode-src (compile-file-pathname tmp-file :output-type :bitcode))
(compile-file-pathname physical-output-file :output-type :bitcode)) (bitcode-target (compile-file-pathname physical-output-file :output-type :bitcode)))
(when (probe-file bitcode-src)
(rename-file-overwriting-target bitcode-src bitcode-target)))
(rename-file-overwriting-target tmp-object-file object-file)) (rename-file-overwriting-target tmp-object-file object-file))
(rename-file-overwriting-target output-truename physical-output-file) (rename-file-overwriting-target output-truename physical-output-file)
(setf output-truename (truename physical-output-file))) (setf output-truename (truename physical-output-file)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment