* libI77/rdfmt.c (rd_I): Delete unused variable(s).

[pf3gnuchains/gcc-fork.git] / libf2c / libU77 / stat_.c

diff --git a/libf2c/libU77/stat_.c b/libf2c/libU77/stat_.c
index b864da2..65a63b7 100644 (file)
--- a/libf2c/libU77/stat_.c
+++ b/libf2c/libU77/stat_.c
@@ -33,7 +33,6 @@ integer
 G77_stat_0 (const char *name, integer statb[13], const ftnlen Lname)
 {
   char *buff;
-  char *bp, *blast;
   int err;
   struct stat buf;