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