fix mode mask for mkdir

svn: r6956
This commit is contained in:
Matthew Flatt 2007-07-25 12:55:03 +00:00
parent 90c5bea2e3
commit 4dd9345618

View File

@ -4986,7 +4986,7 @@ static Scheme_Object *make_directory(int argc, Scheme_Object *argv[])
while (1) { while (1) {
if (!MSC_W_IZE(mkdir)(MSC_WIDE_PATH(filename) if (!MSC_W_IZE(mkdir)(MSC_WIDE_PATH(filename)
# ifndef MKDIR_NO_MODE_FLAG # ifndef MKDIR_NO_MODE_FLAG
, 0xFFFF , 0x0777
# endif # endif
)) ))
return scheme_void; return scheme_void;