Re: [Patch, Fortran, Committed] PR testsuite/56082 / PR fortran/56304 (libquad) Test-case fixes

[Janus Weil <janus at gcc dot gnu dot org>]

Hi Tobias,

since you're fixing test cases: What about PR 55852 comment 10?


"The test case fails because the match is too strict.

$ grep iszs intrinsic_size_3.f90.003t.original
  integer(kind=2) iszs;
          iszs = (integer(kind=2)) MAX_EXPR <(D.854->dim[0].ubound -
D.854->dim[0].lbound) + 1, 0>;"


You were the who committed this test case. Could you have a look?

Thanks,
Janus



2013/2/13 Tobias Burnus <burnus@net-b.de>:
> I have committed a fix for PR 56082, where the test case assumed that C_Bool
> is a byte wide (kind=1); however, on 32bit Darwin, C_Bool is by default an
> "int" (kind=4) – hence, a warning is not printed. The change was to use
> logical(kind=2) for the example, assuming C_Bool is never kind=2.
> Committed as http://gcc.gnu.org/viewcvs?view=revision&revision=195984
>
> For PR 56204, the test case assumed that I/O uses by default the same
> rounding for input and output. That worked well, except on Solaris – well,
> using an epsilon criterion is also fine. Patched by the attached patch.
> (Committed as Rev. 196011.)
>
> Tobias