diff options
| -rw-r--r-- | gcc/fortran/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/fortran/options.c | 4 |
2 files changed, 9 insertions, 0 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 4463ecd..2a3be8d 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,8 @@ +2013-10-10 Tobias Burnus <burnus@net-b.de> + + PR fortran/58226 + * options.c (gfc_get_option_string): Handle zero arg case. + 2013-10-02 Tobias Burnus <burnus@net-b.de> PR fortran/58593 diff --git a/gcc/fortran/options.c b/gcc/fortran/options.c index 3a9c508..6e4e7c1 100644 --- a/gcc/fortran/options.c +++ b/gcc/fortran/options.c @@ -1166,6 +1166,10 @@ gfc_get_option_string (void) size_t len, pos; char *result; + /* Allocate and return a one-character string with '\0'. */ + if (!save_decoded_options_count) + return XCNEWVEC (char, 1); + /* Determine required string length. */ len = 0; |