Red Hat Linux
Click URL instructions:
Right-click on ad, choose "Copy Link", then paste here →
(This may not be possible with some types of ads)
You seem to have CSS turned off.
Please don't fill out this field.
Briefly describe the problem (required):
Please provide the ad click URL, if possible:
Update of /cvsroot/sbcl/sbcl/contrib/sb-posix
In directory sfp-cvsdas-3.v30.ch3.sourceforge.com:/tmp/cvs-serv16292/contrib/sb-posix
220.127.116.11: fix readdir for :inode64 builds
* readdir now calls readdir$INODE64 when buildling with :inode64
(launchpad bug #592897)
RCS file: /cvsroot/sbcl/sbcl/contrib/sb-posix/interface.lisp,v
retrieving revision 1.59
retrieving revision 1.60
diff -u -d -r1.59 -r1.60
--- interface.lisp 21 Jan 2010 05:09:44 -0000 1.59
+++ interface.lisp 12 Jun 2010 20:44:42 -0000 1.60
@@ -126,6 +126,15 @@
(define-call* "unlink" int minusp (pathname filename))
(define-call #-netbsd "opendir" #+netbsd "_opendir"
(* t) null-alien (pathname filename))
+(define-call ("readdir" :c-name "readdir$INODE64" :options :largefile)
+ (* dirent)
+ ;; readdir() has the worst error convention in the world. It's just
+ ;; too painful to support. (return is NULL _and_ errno "unchanged"
+ ;; is not an error, it's EOF).
+ (dir (* t)))
(define-call (#-netbsd "readdir" #+netbsd "_readdir" :options :largefile)
;; readdir() has the worst error convention in the world. It's just
Sign up for the SourceForge newsletter: