diff options
-rw-r--r-- | gcc/fortran/ChangeLog | 4 | ||||
-rw-r--r-- | gcc/fortran/misc.c | 3 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 34a470d..12b8e6f8 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,7 @@ +2007-02-14 Steven G. Kargl <kargl@gcc.gnu.org> + + * misc.c (gfc_typename): Fix potential buffer overflow. + 2007-02-13 Paul Thomas <pault@gcc.gnu.org> PR fortran/30554 diff --git a/gcc/fortran/misc.c b/gcc/fortran/misc.c index c0150ed..f1fdbf5 100644 --- a/gcc/fortran/misc.c +++ b/gcc/fortran/misc.c @@ -152,7 +152,8 @@ gfc_basic_typename (bt type) const char * gfc_typename (gfc_typespec *ts) { - static char buffer1[60], buffer2[60]; /* FIXME: Buffer overflow. */ + static char buffer1[GFC_MAX_SYMBOL_LEN + 7]; /* 7 for "TYPE()" + '\0'. */ + static char buffer2[GFC_MAX_SYMBOL_LEN + 7]; static int flag = 0; char *buffer; |