[patch, libgfortran] [7/8 Regression] Crash of runtime gfortran library during integer transformation

[Jerry DeLisle]

On 05/15/2017 03:51 PM, Steve Kargl wrote:
> On Mon, May 15, 2017 at 01:10:43PM -0700, Jerry DeLisle wrote:
>>
>> 2017-05-15  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
>>
>> 	PR libgfortran/80727
>> 	* transfer.c (read_sf_internal): Remove bogus code to detect EOR.
>> 	(read_block_form): For internal units, generate EOR if no more
>> 	bytes left in unit and we are trying to read with ADVANCE='NO'.
> 
> OK with change below.
> 
>>
>> ! { dg-do run }
>> ! PR80727 Crash of runtime gfortran library during integer transformation
>> ! Note: before the patch this was giving an incorrect EOR error on READ.
>> program    gfortran_710_io_bug
>>   character  str*4
>>   integer*4  i4
> 
>     integer(4)
> 
>>   str =''
>>   i = 256
>>   write(str,fmt='(a)') i
>>   i = 0
>>   read ( unit=str(1:4), fmt='(a)' ) i4
>>   if (i4.ne.256) call abort
>> end  program  gfortran_710_io_bug 
> 

Oh, thanks Steve. I forgot to run the new test with the machinery.

Will fix, check it one more time, then commit.

Jerry