scanner.c (preprocessor_line): Only set current_file->line when errors have not been...
authorJakub Jelinek <jakub@redhat.com>
Thu, 7 Jul 2005 15:55:53 +0000 (17:55 +0200)
committerJakub Jelinek <jakub@gcc.gnu.org>
Thu, 7 Jul 2005 15:55:53 +0000 (17:55 +0200)
commit4c3a6ca189d0bf3a62b4f529275e0a666543650c
tree6b2f9b6876ae8fbaeef20fec5fcae091d024b66a
parent452190fb6ac2ab8706715a14e82d742ae545d6c2
scanner.c (preprocessor_line): Only set current_file->line when errors have not been encountered.

* scanner.c (preprocessor_line): Only set current_file->line when errors
have not been encountered.  Warn and don't crash if a file leave
preprocessor line has no corresponding entering line.  Formatting.

* gfortran.dg/badline.f: New test.

From-SVN: r101717
gcc/fortran/ChangeLog
gcc/fortran/scanner.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/badline.f [new file with mode: 0644]