On 02/01/2015 01:02 PM, Tobias Burnus wrote:
Jerry DeLisle wrote:
The attached patch fixes this issue.
Regression tested on x86-64.
New test case attached.
OK for trunk?
Looks ok (together with a changelog for the test case).
However, I tried a similar fixed-form program and it failed similar
On 02/01/2015 08:34 PM, Jerry DeLisle wrote:
The test case should have the print *, astring changed to call abort.
Jerry
! { dg-do run }
! { dg-options "-std=gnu" }
! PR64506 fixed form source
character(25) :: astring
100 format('This format is OK.'
&)
200 format('This format wor
Jerry DeLisle wrote:
The attached patch fixes this issue.
Regression tested on x86-64.
New test case attached.
OK for trunk?
Looks ok (together with a changelog for the test case).
However, I tried a similar fixed-form program and it failed similarly. I
think you need a similar fix (in the sa
The attached patch fixes this issue.
Regression tested on x86-64.
New test case attached.
OK for trunk?
Regards,
Jerry
2015-02-01 Jerry DeLisle
PR fortran/64506
* scanner.c (gfc_next_char_literal): Check for '!' and if found,
clear the comment and go back and get
