re PR fortran/46140 (Include not found - but exit status code is zero)
2010-10-25 Steven G. Kargl <kargl@gcc.gnu.org> PR fortran/46140 * fortran/scanner.c (include_line): Check return value of load_file. From-SVN: r165922
This commit is contained in:
parent
ab0c3d8ef5
commit
570f469171
|
@ -1,3 +1,8 @@
|
|||
2010-10-25 Steven G. Kargl <kargl@gcc.gnu.org>
|
||||
|
||||
PR fortran/46140
|
||||
* fortran/scanner.c (include_line): Check return value of load_file.
|
||||
|
||||
2010-10-23 Tobias Burnus <burnus@net-b.de>
|
||||
|
||||
PR fortran/46122
|
||||
|
|
|
@ -1867,7 +1867,9 @@ include_line (gfc_char_t *line)
|
|||
read by anything else. */
|
||||
|
||||
filename = gfc_widechar_to_char (begin, -1);
|
||||
load_file (filename, NULL, false);
|
||||
if (load_file (filename, NULL, false) == FAILURE)
|
||||
exit (1);
|
||||
|
||||
gfc_free (filename);
|
||||
return true;
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue