X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-posix%2Fposix-tests.lisp;h=95afdd51db1b35fa4561c36c4d48fb2dbca50057;hb=93dd7df18bb1774e6620df84598122d8650127e5;hp=549910b84d4454e60baf50e9fb272cbfe25be042;hpb=faa1bdc63e953ad672a83fa20e5ff61cff92206f;p=sbcl.git

diff --git a/contrib/sb-posix/posix-tests.lisp b/contrib/sb-posix/posix-tests.lisp
index 549910b..95afdd5 100644
--- a/contrib/sb-posix/posix-tests.lisp
+++ b/contrib/sb-posix/posix-tests.lisp
@@ -173,7 +173,9 @@
   #.sb-posix:eisdir
   #+win32
   #.sb-posix::eacces
-  #-(or darwin win32)
+  #+sunos
+  #.sb-posix::einval
+  #-(or darwin win32 sunos)
   #.sb-posix::ebusy)
 
 (deftest rmdir.error.4
@@ -508,8 +510,7 @@
   nil)
 
 (deftest readdir.1
-  (let ((dir (sb-posix:opendir "/"))
-        (sb-alien::*default-c-string-external-format* :latin-1))
+  (let ((dir (sb-posix:opendir "/")))
     (unwind-protect
        (block dir-loop
          (loop for dirent = (sb-posix:readdir dir)
@@ -775,7 +776,7 @@
 
 ;#-(or win32 sunos hpux)
 ;;;; mkdtemp is unimplemented on at least Solaris 10
-#-(or win32 hpux)
+#-(or win32 hpux sunos)
 ;;; But it is implemented on OpenSolaris 2008.11
 (deftest mkdtemp.1
     (let ((pathname