OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Report error when -fpre-include can't be opened (PR fortran/88912). 

2019-02-04  Martin Liska  <mliska@suse.cz>

	PR fortran/88912
	* scanner.c (load_file): Report error for -fpre-include
	file and do not ICE.

From-SVN: r268517
This commit is contained in:
Martin Liska 2019-02-04 13:20:59 +01:00 committed by Martin Liska
parent 1d546c6098
commit fcd698d713
2 changed files with 14 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/fortran/ChangeLog
View File

@ -1,3 +1,9 @@
2019-02-04 Martin Liska <mliska@suse.cz>
PR fortran/88912
* scanner.c (load_file): Report error for -fpre-include
file and do not ICE.
2019-02-02 Dominique d'Humieres <dominiq@gcc.gnu.org>
PR fortran/81344

10
gcc/fortran/scanner.c
View File

@ -2478,8 +2478,14 @@ load_file (const char *realfilename, const char *displayedname, bool initial)
input = gfc_open_included_file (realfilename, false, false);
if (input == NULL)
{
fprintf (stderr, "%s:%d: Error: Can't open included file '%s'\n",
current_file->filename, current_file->line, filename);
/* For -fpre-include file, current_file is NULL. */
if (current_file)
fprintf (stderr, "%s:%d: Error: Can't open included file '%s'\n",
current_file->filename, current_file->line, filename);
else
fprintf (stderr, "Error: Can't open pre-included file '%s'\n",
filename);
return false;
}
stat_result = stat (realfilename, &st);