diff options
| -rw-r--r-- | gcc/f/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/f/com.c | 2 |
2 files changed, 8 insertions, 0 deletions
diff --git a/gcc/f/ChangeLog b/gcc/f/ChangeLog index 6d98640414d..32db301a5ca 100644 --- a/gcc/f/ChangeLog +++ b/gcc/f/ChangeLog @@ -1,3 +1,9 @@ +2003-06-24 Scott Snyder <snyder@fnal.gov> + + PR fortran/11299 + * com.c (ffe_init): Call push_srcloc() to ensure that + input_file_stack is initialized. + Sat Jun 21 21:29:38 2003 Neil Booth <neil@daikokuya.co.uk> * lang.opt: Add -fpreprocessed. diff --git a/gcc/f/com.c b/gcc/f/com.c index f384439955b..098cb3db721 100644 --- a/gcc/f/com.c +++ b/gcc/f/com.c @@ -14246,6 +14246,8 @@ ffe_init () to try doing this. */ ffelex_hash_kludge (finput); + push_srcloc (input_filename, 0); + /* FIXME: The ffelex_hash_kludge code needs to be cleaned up to set the new file name. Maybe in ffe_post_options. */ return true; |