diff --git a/test/asdf-pathname-test.script b/test/asdf-pathname-test.script
index 525716d9d84d22aa916c67e7a27c744b1a3a9433..89b73170eb6ab4265331761884f04243113b1807 100644
--- a/test/asdf-pathname-test.script
+++ b/test/asdf-pathname-test.script
@@ -122,9 +122,9 @@
                                           (print-condition-backtrace c))
                                         (return nil))))
                 (with-open-file (stream (component-pathname file)
-                                        :direction :output :if-exists :rename-and-delete
+                                        :direction :output :if-exists
+                                        (or #+(and sbcl os-windows) :rename-and-delete :supersede)
                                         :if-does-not-exist :error)
-                  ;; SBCL on Windows hates :supersede here
                   (print start-time stream)
                   t)))
       (incf file-failures)