Commit 58b2a358 by Tobias Burnus Committed by Tobias Burnus

re PR fortran/58226 (negative subscript pos at fortran/options.c:1205)

2013-10-09  Tobias Burnus  <burnus@net-b.de>

        PR fortran/58226
        * options.c (gfc_get_option_string): Handle zero arg case.

From-SVN: r203394
parent b591a8b7
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
......
......@@ -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;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment