0.7.13.21:

[sbcl.git] / src / cold / slam.lisp

diff --git a/src/cold/slam.lisp b/src/cold/slam.lisp
index 7101401..92534c6 100644 (file)
--- a/src/cold/slam.lisp
+++ b/src/cold/slam.lisp
@@ -39,4 +39,6 @@
                                stem
                                *target-obj-suffix*)))
       (unless (output-up-to-date-wrt-input-p objname srcname)
-       (target-compile-stem stem)))))
+       (target-compile-stem stem
+                            :assem-p (find :assem flags)
+                            :ignore-failure-p (find :ignore-failure-p flags))))))