ports/154019: [patch] lang/sbcl: wrong errno for mkdir/rmdir / in sb-posix tests

[Anonymous]

>Number:         154019
>Category:       ports
>Synopsis:       [patch] lang/sbcl: wrong errno for mkdir/rmdir / in sb-posix tests
>Confidential:   no
>Severity:       non-critical
>Priority:       low
>Responsible:    freebsd-ports-bugs
>State:          open
>Quarter:        
>Keywords:       
>Date-Required:
>Class:          sw-bug
>Submitter-Id:   current-users
>Arrival-Date:   Sat Jan 15 06:10:10 UTC 2011
>Closed-Date:
>Last-Modified:
>Originator:     Anonymous
>Release:        FreeBSD 9.0-CURRENT amd64
>Organization:
>Environment:
>Description:
>How-To-Repeat:
$ mkdir /
mkdir: /: Is a directory
$ rmdir /
rmdir: /: Is a directory

$ make
[...]
; /usr/ports/lang/sbcl/work/sbcl-1.0.43/contrib/sb-posix/ASDF-TMP-posix-tests.fasl written
; compilation finished in 0:00:00.034
Doing 69 pending tests of 69 tests total.
 SB-POSIX-TESTS::CHDIR.1 SB-POSIX-TESTS::CHDIR.2 SB-POSIX-TESTS::CHDIR.3
 SB-POSIX-TESTS::CHDIR.4 SB-POSIX-TESTS::CHDIR.5 SB-POSIX-TESTS::CHDIR.6
 SB-POSIX-TESTS::CHDIR.7 SB-POSIX-TESTS::CHDIR.8 SB-POSIX-TESTS::CHDIR.ERROR.1
 SB-POSIX-TESTS::CHDIR.ERROR.2 SB-POSIX-TESTS::MKDIR.1 SB-POSIX-TESTS::MKDIR.2
 SB-POSIX-TESTS::MKDIR.ERROR.1
Test SB-POSIX-TESTS::MKDIR.ERROR.2 failed
Form: (HANDLER-CASE (SB-POSIX:MKDIR "/" 0)
                    (SB-POSIX:SYSCALL-ERROR (SB-POSIX-TESTS::C)
                                            (SB-POSIX:SYSCALL-ERRNO
                                             SB-POSIX-TESTS::C)))
Expected value: 17
Actual value: 21.
 SB-POSIX-TESTS::MKDIR.ERROR.3 SB-POSIX-TESTS::RMDIR.1 SB-POSIX-TESTS::RMDIR.2
 SB-POSIX-TESTS::RMDIR.ERROR.1 SB-POSIX-TESTS::RMDIR.ERROR.2
Test SB-POSIX-TESTS::RMDIR.ERROR.3 failed
Form: (HANDLER-CASE (SB-POSIX:RMDIR "/")
                    (SB-POSIX:SYSCALL-ERROR (SB-POSIX-TESTS::C)
                                            (SB-POSIX:SYSCALL-ERRNO
                                             SB-POSIX-TESTS::C)))
Expected value: 16
Actual value: 21.
 SB-POSIX-TESTS::RMDIR.ERROR.4 SB-POSIX-TESTS::RMDIR.ERROR.5

>Fix:
--- a.diff begins here ---
Index: lang/sbcl/files/patch-contrib_sb-posix_posix-tests.lisp
===================================================================
RCS file: lang/sbcl/files/patch-contrib_sb-posix_posix-tests.lisp
diff -N lang/sbcl/files/patch-contrib_sb-posix_posix-tests.lisp
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ lang/sbcl/files/patch-contrib_sb-posix_posix-tests.lisp	15 Jan 2011 05:20:37 -0000
@@ -0,0 +1,32 @@
+--- contrib/sb-posix/posix-tests.lisp~
++++ contrib/sb-posix/posix-tests.lisp
+@@ -108,11 +108,11 @@
+       (sb-posix:mkdir #-win32 "/" #+win32 "C:/" 0)
+     (sb-posix:syscall-error (c)
+       (sb-posix:syscall-errno c)))
+-  #+darwin
++  #+(or darwin freebsd)
+   #.sb-posix:eisdir
+   #+win32
+   #.sb-posix:eacces
+-  #-(or darwin win32)
++  #-(or darwin freebsd win32)
+   #.sb-posix::eexist)
+ 
+ (define-eacces-test mkdir.error.3
+@@ -169,13 +169,13 @@
+       (sb-posix:rmdir #-win32 "/" #+win32 "C:/")
+     (sb-posix:syscall-error (c)
+       (sb-posix:syscall-errno c)))
+-  #+darwin
++  #+(or darwin freebsd)
+   #.sb-posix:eisdir
+   #+win32
+   #.sb-posix::eacces
+   #+sunos
+   #.sb-posix::einval
+-  #-(or darwin win32 sunos)
++  #-(or darwin freebsd win32 sunos)
+   #.sb-posix::ebusy)
+ 
+ (deftest rmdir.error.4
--- a.diff ends here ---
>Release-Note:
>Audit-Trail:
>Unformatted: