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

fixes for Windows related to missing-module exceptions

Browse Source
This commit is contained in:
Matthew Flatt 2013-04-24 12:53:38 -06:00
parent ebd7ebea4f
commit 749c0842a8
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -4987,7 +4987,7 @@ scheme_do_open_output_file(char *name, int offset, int argc, Scheme_Object *argv
*err = "cannot open destination";
*eerrno = errv;
} else
filename_exn(name, "cannot open output file", filename, errv);
filename_exn(name, "cannot open output file", filename, errv, 0);
return NULL;
}
}
@ -5007,7 +5007,7 @@ scheme_do_open_output_file(char *name, int offset, int argc, Scheme_Object *argv
if ((mode[1] == 't') && !regfile) {
CloseHandle(fd);
filename_exn(name, "cannot use text-mode on a non-file device", filename, 0);
filename_exn(name, "cannot use text-mode on a non-file device", filename, 0, 0);
return NULL;
}
@ -5031,7 +5031,7 @@ scheme_do_open_output_file(char *name, int offset, int argc, Scheme_Object *argv
" path: %q",
name, filename);
else
filename_exn(name, "cannot open directory as a file", filename, errno);
filename_exn(name, "cannot open directory as a file", filename, errno, 0);
return NULL;
}