* file.c (rb_file_truncate): discard read buffer before truncation.

  [ruby-dev:24197]


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@7057 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 4 insertions, 0 deletions

diff --git a/file.c b/file.c
index ffa70c6093..d656b705c1 100644
--- a/file.c
+++ b/file.c
@@ -67,6 +67,9 @@ char *strrchr _((const char*,const char));
 #ifndef HAVE_LSTAT
 #define lstat(path,st) stat(path,st)
 #endif
+#if !HAVE_FSEEKO && !defined(fseeko)
+# define fseeko  fseek
+#endif
 
 VALUE rb_cFile;
 VALUE rb_mFileTest;
@@ -2861,6 +2864,7 @@ rb_file_truncate(obj, len)
     }
     f = GetWriteFile(fptr);
     fflush(f);
+    fseeko(f, (off_t)0, SEEK_CUR);
 #ifdef HAVE_TRUNCATE
     if (ftruncate(fileno(f), NUM2OFFT(len)) < 0)
 	rb_sys_fail(fptr->path);