X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Ffilesys.pure.lisp;h=a08e1341dd26a84cbef5a954aed72e509e24b5a4;hb=5877e8c2334bd87490be385af21ed9bc494f19e2;hp=ec4c35e6073d92d482441929572d3c6baaf53c6b;hpb=0e4b15d65c46653b1ea222dcbf12d635d59b36c7;p=sbcl.git diff --git a/tests/filesys.pure.lisp b/tests/filesys.pure.lisp index ec4c35e..a08e134 100644 --- a/tests/filesys.pure.lisp +++ b/tests/filesys.pure.lisp @@ -107,7 +107,7 @@ ;;; given only safe characters in the namestring, NATIVE-PATHNAME will ;;; never error, and NATIVE-NAMESTRING on the result will return the ;;; original namestring. -(with-test (:name :random-native-namestrings :fails-on :win32) +(with-test (:name :random-native-namestrings) (let ((safe-chars (coerce (cons #\Newline