Think C 4.0 fixes a bug in 3.0 that we programmed around.

diff --git a/Objects/fileobject.c b/Objects/fileobject.c
index 09690c65f8172134a3eea022ab6310dff86ea39e..f87e22e430ecaa613e495dd69741b91a96a0a335 100644 (file)
--- a/Objects/fileobject.c
+++ b/Objects/fileobject.c
@@ -188,8 +188,8 @@ file_readline(f, args)
        v = newsizedstringobject((char *)NULL, n);
        if (v == NULL)
                return NULL;
-#ifndef THINK_C
-       /* XXX Think C reads n characters, others read n-1 characters... */
+#ifndef THINK_C_3_0
+       /* XXX Think C 3.0 wrongly reads up to n characters... */
        n = n+1;
 #endif
        if (fgets(getstringvalue(v), n, f->f_fp) == NULL) {