X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-posix%2Fdefpackage.lisp;h=bf507d5175b6670c0c9ab61df285ad478337ea73;hb=ad6345c0021507c8830c7c8541ed651a89792335;hp=e17432154a3d2619f8ad4ec77ddf995ada3a52bb;hpb=95110584db3224cf61b774f1402a71a79e61432f;p=sbcl.git

diff --git a/contrib/sb-posix/defpackage.lisp b/contrib/sb-posix/defpackage.lisp
index e174321..bf507d5 100644
--- a/contrib/sb-posix/defpackage.lisp
+++ b/contrib/sb-posix/defpackage.lisp
@@ -1,4 +1,19 @@
-(defpackage :sb-posix (:use)
-  (:export #:syscall-error #:syscall-errno))
+(defpackage :sb-posix (:use #:sb-alien #:cl)
+  (:shadow close open ftruncate truncate time)
+  (:export #:syscall-error #:syscall-errno
 
-(defpackage :sb-posix-internal (:use #:sb-alien #:cl))
+           ;; grovel structure accessors
+
+           #:dirent-name
+
+           ;; wrapper class accessors
+
+           #:passwd-name #:passwd-passwd #:passwd-uid #:passwd-gid
+           #:passwd-gecos #:passwd-dir #:passwd-shell
+           #: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))
+
+#+win32
+(load-shared-object "msvcrt.dll")