suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

work around an access() problem on Mac OS X

Browse Source 
... again.

Merge to v6.3
This commit is contained in:
Matthew Flatt 2015-10-19 17:40:37 -06:00
parent 079183eb6a
commit 7cffdca067
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
racket/src/racket/src/file.c
View File

@ -6143,7 +6143,11 @@ static Scheme_Object *file_or_dir_permissions(int argc, Scheme_Object *argv[])
} while ((ok == -1) && (errno == EINTR));
write = !ok;
if (ok && (errno != EACCES))
/* Don't fail at the exec step if errno is EPERM; under Mac OS
X, at least, such a failure seems to mean that the file is
not writable. (We assume it's not a directory-access issue,
since the read test succeeded.) */
if (ok && (errno != EACCES) && (errno != EPERM))
l = NULL;
else {
do {