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

fix 'can-update for Windows

Browse Source 
svn: r9527
This commit is contained in:
Matthew Flatt 2008-04-29 00:24:24 +00:00
parent e5fba85ed0
commit 3c9a4a284a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/mzscheme/src/port.c
View File

@ -3864,7 +3864,7 @@ scheme_do_open_output_file(char *name, int offset, int argc, Scheme_Object *argv
} else if (existsok == 2) { } else if (existsok == 2) {
hmode = OPEN_EXISTING; hmode = OPEN_EXISTING;
} else if (existsok == 3) { } else if (existsok == 3) {
hmode = CREATE_NEW; hmode = OPEN_ALWAYS;
} }
fd = CreateFileW(WIDE_PATH(filename), fd = CreateFileW(WIDE_PATH(filename),