:test-file will not work with files beginning with "test-"

[mfiano]

asdf:test-system will not work with the following because of the filename starting with "test-":

(asdf:defsystem some.sys.tests
  :depends-on (:some.sys :prove)
  :components ((:test-file "t/test-vector"))
  :defsystem-depends-on (:prove-asdf)
  :perform (asdf:test-op :after (op c)
                         (funcall (intern #.(string :run-test-system) :prove.asdf)
                                  c)))

The following will work:

(asdf:defsystem some.sys.tests
  :depends-on (:some.sys :prove)
  :components ((:test-file "t/hello-vector"))
  :defsystem-depends-on (:prove-asdf)
  :perform (asdf:test-op :after (op c)
                         (funcall (intern #.(string :run-test-system) :prove.asdf)
                                  c)))