X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-posix%2Fdefpackage.lisp;h=ecd7f5971b2b6a87bf26a20873de7cfcf8d0f342;hb=25c1769e30ff7404b52a9be663626d87f8ff75bc;hp=335b095ef0b26b1cddca3fa4aa01ad67f817695a;hpb=a7c8cdf31fd9f411452532084bebd267cbf75454;p=sbcl.git

diff --git a/contrib/sb-posix/defpackage.lisp b/contrib/sb-posix/defpackage.lisp
index 335b095..ecd7f59 100644
--- a/contrib/sb-posix/defpackage.lisp
+++ b/contrib/sb-posix/defpackage.lisp
@@ -1,15 +1,27 @@
-(defpackage :sb-posix (:use)
-  (:export #:syscall-error #:syscall-errno
+(defpackage :sb-posix (:use #:sb-alien #:cl)
+  (:shadow abort close open ftruncate truncate time read write)
+  (:export #:syscall-error #:syscall-errno #:syscall-name
 
-	   ;; grovel structure accessors
-	   
-	   #:dirent-name
+           ;; types and type conversion
+           #:file-descriptor-designator
+           #:file-descriptor
+           #:filename-designator
+           #:filename
 
-	   ;; wrapper class accessors
-	   
-	   #:stat-mode #:stat-ino #:stat-dev #:stat-nlink #:stat-uid
-	   #:stat-gid #:stat-size #:stat-atime #:stat-mtime #:stat-ctime
-	   #:termios-iflag #:termios-oflag #:termios-cflag
-	   #:termios-lflag #:termios-cc))
+           ;; grovel structure accessors
+           #:dirent-name #-win32 #:dirent-ino
 
-(defpackage :sb-posix-internal (:use #:sb-alien #:cl))
+           ;; wrapper class accessors
+           #:passwd-name #:passwd-passwd #:passwd-uid #:passwd-gid
+           #:passwd-gecos #:passwd-dir #:passwd-shell
+           #:group-name #:group-gid #:group-passwd
+           #:stat-mode #:stat-ino #:stat-dev #:stat-nlink #:stat-uid
+           #:stat-gid #:stat-size #:stat-atime #:stat-mtime #:stat-ctime
+           #:stat-rdev
+           #:termios-iflag #:termios-oflag #:termios-cflag
+           #:termios-lflag #:termios-cc #:timeval-sec #:timeval-usec
+           #:flock-type #:flock-whence #:flock-start #:flock-len
+           #:flock-pid))
+
+#+win32
+(sb-alien:load-shared-object "msvcrt.dll")