Ugly band-aid to work around a bug in Linux ftell().

d1b14ae4 · Guido van Rossum · 19d50d96 · d1b14ae4
Commit d1b14ae4 authored May 05, 1998 by Guido van Rossum
Hide whitespace changes
Inline Side-by-side

Showing with 3 additions and 1 deletion

Objects/fileobject.c Objects/fileobject.c +3 -1

No files found.
--- a/Objects/fileobject.c
+++ b/Objects/fileobject.c
@@ -421,7 +421,9 @@ new_buffersize(f, currentsize)
 	struct stat st;
 	if (fstat(fileno(f->f_fp), &st) == 0) {
 		end = st.st_size;
-		pos = ftell(f->f_fp);
+		pos = lseek(fileno(f->f_fp), 0L, SEEK_CUR);
+		if (pos >= 0)
+			pos = ftell(f->f_fp);
 		if (pos < 0)
 			clearerr(f->f_fp);
 		if (end > pos && pos >= 0)