X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-posix%2Fdefpackage.lisp;h=59567f5510e04de4cab39002d0b3a71f8726e48a;hb=6bbc22725d3bf663726ed9adca544e39316364a6;hp=e539cf3eaf0af11f8b4c67fcca443f352d945f82;hpb=4898ef32c639b1c7f4ee13a5ba566ce6debd03e6;p=sbcl.git diff --git a/contrib/sb-posix/defpackage.lisp b/contrib/sb-posix/defpackage.lisp index e539cf3..59567f5 100644 --- a/contrib/sb-posix/defpackage.lisp +++ b/contrib/sb-posix/defpackage.lisp @@ -1,4 +1,5 @@ -(defpackage :sb-posix (:use) +(defpackage :sb-posix (:use #:sb-alien #:cl) + (:shadow close open ftruncate truncate time) (:export #:syscall-error #:syscall-errno ;; grovel structure accessors @@ -7,9 +8,15 @@ ;; 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 #:termios-iflag #:termios-oflag #:termios-cflag - #:termios-lflag #:termios-cc)) + #:termios-lflag #:termios-cc #:timeval-sec #:timeval-usec + #:flock-type #:flock-whence #:flock-start #:flock-len + #:flock-pid)) -(defpackage :sb-posix-internal (:use #:sb-alien #:cl)) +#+win32 +(load-shared-object "msvcrt.dll")