diff options
Diffstat (limited to 'gcc/f/parse.c')
| -rw-r--r-- | gcc/f/parse.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/gcc/f/parse.c b/gcc/f/parse.c index e21dcce..d822773 100644 --- a/gcc/f/parse.c +++ b/gcc/f/parse.c @@ -31,6 +31,7 @@ extern FILE *finput; void ffe_parse_file (int set_yydebug ATTRIBUTE_UNUSED) { + const char *fname; ffewhereFile wf; if (ffe_is_version ()) @@ -39,8 +40,9 @@ ffe_parse_file (int set_yydebug ATTRIBUTE_UNUSED) if (!ffe_is_pedantic ()) ffe_set_is_pedantic (pedantic); - wf = ffewhere_file_new (main_input_filename, strlen (main_input_filename)); - ffecom_file (main_input_filename); + fname = main_input_filename ? main_input_filename : "<stdin>"; + wf = ffewhere_file_new (fname, strlen (fname)); + ffecom_file (fname); ffe_file (wf, finput); ffecom_finish_compile (); |