Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Karsten Poeck
asdf
Commits
3a3e1af7
Commit
3a3e1af7
authored
Sep 28, 2019
by
Karsten Poeck
Browse files
Assure that the bitcode-file also gets renamed
parent
9ddf5d0b
Changes
1
Hide whitespace changes
Inline
Side-by-side
uiop/lisp-build.lisp
View file @
3a3e1af7
...
...
@@ -757,12 +757,16 @@ it will filter them appropriately."
#+
sbcl
(
when
cfasl-file
(
rename-file-overwriting-target
tmp-cfasl
cfasl-file
))
#+
clasp
(
progn
;;; the following
3
rename-file-overwriting-target better be atomic, but we can't implement this right now
;;; the following
4
rename-file-overwriting-target better be atomic, but we can't implement this right now
#+
:target-os-darwin
(
let
((
temp-dwarf
(
pathname
(
concatenate
'string
(
namestring
output-truename
)
".dwarf"
)))
(
target-dwarf
(
pathname
(
concatenate
'string
(
namestring
physical-output-file
)
".dwarf"
))))
(
when
(
probe-file
temp-dwarf
)
(
rename-file-overwriting-target
temp-dwarf
target-dwarf
)))
;;; need to rename the bc or ll file as well or test-bundle.script fails
(
rename-file-overwriting-target
(
compile-file-pathname
tmp-file
:output-type
:bitcode
)
(
compile-file-pathname
physical-output-file
:output-type
:bitcode
))
(
rename-file-overwriting-target
tmp-object-file
object-file
))
(
rename-file-overwriting-target
output-truename
physical-output-file
)
(
setf
output-truename
(
truename
physical-output-file
)))
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment