X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcode%2Funix.lisp;h=d6290d8c956f7a7a2edd4e1d0663fe7005d6b3a5;hb=568daf6b160280428701670b921f419aabd9eba0;hp=8312381a2dff9a2aae3596225d7947ac9ce8eb69;hpb=c03ebb54770cfa613d4b706a80e5be231786a5d0;p=sbcl.git diff --git a/src/code/unix.lisp b/src/code/unix.lisp index 8312381..d6290d8 100644 --- a/src/code/unix.lisp +++ b/src/code/unix.lisp @@ -325,7 +325,7 @@ SYSCALL-FORM. Repeat evaluation of SYSCALL-FORM if it is interrupted." (cast fds (* int)) size mode)) #!+win32(defun unix-pipe () (with-alien ((fds (array int 2))) - (msvcrt-raw-pipe fds 256 o_binary))) + (msvcrt-raw-pipe fds 256 o_binary))) ;; Windows mkdir() doesn't take the mode argument. It's cdecl, so we could ;; actually call it passing the mode argument, but some sharp-eyed reader