Quiet lint
diff --git a/Objects/fileobject.c b/Objects/fileobject.c
index 8e35e7e..ce18cb3 100644
--- a/Objects/fileobject.c
+++ b/Objects/fileobject.c
@@ -83,7 +83,6 @@
 {
 	extern int fclose PROTO((FILE *));
 	fileobject *f;
-	FILE *fp;
 	f = (fileobject *) newopenfileobject((FILE *)NULL, name, mode, fclose);
 	if (f == NULL)
 		return NULL;
@@ -250,7 +249,7 @@
 		err_badarg();
 		return NULL;
 	}
-	return newintobject((long)isatty(fileno(f->f_fp)));
+	return newintobject((long)isatty((int)fileno(f->f_fp)));
 }
 
 static object *
@@ -403,7 +402,7 @@
 		}
 	}
 
-	return getline((object *)f, n);
+	return getline(f, n);
 }
 
 static object *