scanner.c (gfc_next_char_literal): Reset truncation flag for lines ending in a commen...
authorRichard Guenther <rguenth@gcc.gnu.org>
Sun, 17 Apr 2005 11:56:30 +0000 (11:56 +0000)
committerRichard Biener <rguenth@gcc.gnu.org>
Sun, 17 Apr 2005 11:56:30 +0000 (11:56 +0000)
commita34938bea3d8eeb9bc673b39e6c140825e1cbecf
treef926b91f8476f6f75b7f2f5760cd828b24508fac
parent492f761a97ed76030567349ea2a0ad73c819a9f5
scanner.c (gfc_next_char_literal): Reset truncation flag for lines ending in a comment for both fixed and free form.

2005-04-17  Richard Guenther  <rguenth@gcc.gnu.org>

* scanner.c (gfc_next_char_literal): Reset truncation flag
for lines ending in a comment for both fixed and free form.
(load_line): Do not set truncated flag if only truncating
the EOL marker.

* gfortran.dg/wtruncate.f: New testcase.
* gfortran.dg/wtruncate.f90: New testcase.

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