summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog5
-rw-r--r--win32/win32.c4
2 files changed, 8 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index 19d9d6c5f..5ae9b3c6f 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Wed Oct 29 00:29:46 2008 NAKAMURA Usaku <usa@ruby-lang.org>
+
+ * win32/win32.c (rb_w32_open): need to seek to the end of the file when
+ O_APPEND is specified.
+
Tue Oct 28 23:03:46 2008 Yuki Sonoda (Yugui) <yugui@yugui.jp>
* test/ruby/test_proc.rb: filled all patterns for testing
diff --git a/win32/win32.c b/win32/win32.c
index 13642afa2..b70a6d7fa 100644
--- a/win32/win32.c
+++ b/win32/win32.c
@@ -4129,8 +4129,10 @@ rb_w32_open(const char *file, int oflag, ...)
fd = -1;
goto quit;
}
- if (!(flags & (FDEV | FPIPE)) && (oflag & O_APPEND))
+ if (!(flags & (FDEV | FPIPE)) && (oflag & O_APPEND)) {
flags |= FAPPEND;
+ SetFilePointer(h, 0, NULL, FILE_END);
+ }
_set_osfhnd(fd, (long)h);
_osfile(fd) = flags | FOPEN;