diff --git a/src/tests/normal-tests/compiler.lsp b/src/tests/normal-tests/compiler.lsp index 964ef82bf..ed7b1ac04 100644 --- a/src/tests/normal-tests/compiler.lsp +++ b/src/tests/normal-tests/compiler.lsp @@ -300,7 +300,7 @@ ;;; (truename #p"/tmp/foo") signals an error because //usr is ;;; parsed as a hostname. ;;; -#-(or windows haiku) +#-(or cygwin haiku windows) (test cmp.0013.truename (si:system "rm -rf foo; ln -sf //usr/ foo") (is (equal (namestring (truename "./foo")) "/usr/"))