This is the mail archive of the
gcc-cvs@gcc.gnu.org
mailing list for the GCC project.
r130712 - in /trunk/gcc: fortran/ChangeLog fort...
- From: jakub at gcc dot gnu dot org
- To: gcc-cvs at gcc dot gnu dot org
- Date: Sat, 08 Dec 2007 21:00:07 -0000
- Subject: r130712 - in /trunk/gcc: fortran/ChangeLog fort...
Author: jakub
Date: Sat Dec 8 21:00:06 2007
New Revision: 130712
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=130712
Log:
PR fortran/34359
* gfortran.h (gfc_file): Remove sibling and down fields.
* scanner.c (file_changes, file_changes_cur, file_changes_count,
file_changes_allocated): New variables.
(add_file_change, report_file_change): New functions.
(change_file): Remove.
(gfc_start_source_files, gfc_end_source_files): Call
report_file_change instead of change_file.
(gfc_advance_line): Call report_file_change instead of change_file,
call it even if lb->file == lb->next->file.
(get_file): Revert last changes.
(preprocessor_line): Call add_file_change when entering or leaving
a file.
(load_file): Likewise. Set file_change[...].lb for all newly added
file changes.
* gfortran.dg/include_1.f90: New test.
* gfortran.dg/include_1.inc: New.
* gfortran.dg/include_2.f90: New test.
Added:
trunk/gcc/testsuite/gfortran.dg/include_1.f90
trunk/gcc/testsuite/gfortran.dg/include_1.inc
trunk/gcc/testsuite/gfortran.dg/include_2.f90
Modified:
trunk/gcc/fortran/ChangeLog
trunk/gcc/fortran/gfortran.h
trunk/gcc/fortran/scanner.c
trunk/gcc/testsuite/ChangeLog