Problem with zeros.

Jerry DeLisle jvdelisle@verizon.net
Mon Jul 23 02:43:00 GMT 2007


Tobias Burnus wrote:
> Hi,
> 
> Jerry DeLisle wrote:
>> Based on this I suugest the following patch:
>>
>> Index: read.c
>> ===================================================================
>> -  if (errno != 0 && errno != EINVAL)
>> +  if (errno == EINVAL)
>>        generate_error (&dtp->common, ERROR_READ_VALUE,
>> -                     "Range error during floating point read");
>> +                     "Error during floating point read");
> And Steve wrote:
>> I'm fine with this patch or removing the entire test.
> 
> I also like this patch; from my side it is OK for the trunk and can be
> committed (even as obvious) if it regtests.
> 
> Tobias
> 

Committed revision 126834.

Regards,

Jerry



More information about the Fortran mailing list