2 new testsuite failures on FreeBSD

[Steve Kargl <sgk at troutmask dot apl dot washington dot edu>]

Tobi,

The first failure is related to

2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>

        PR fortran/15963
        * expr.c (check_intrinsic_op): Allow comparison of characters.
        Make logic easier.


kargl[213] gfc -O -c initialization_1.f90 
 In file initialization_1.f90:7

integer :: b(count(a < 'F'))
                  1
Error: Numeric operands are required in expression at (1)
kargl[214] more initialization_1.f90
! PR 15963 -- checks character comparison in initialization expressions
character(8), parameter :: a(5) = (/ "H", "E", "L", "L", "O" /)
call x(a)
contains
subroutine x(a)
character(8), intent(in) :: a(:)
integer :: b(count(a < 'F'))
if (size(b) /= 1) call abort()
end subroutine x
end

The second failure is a combination of Steven's change and my work
on adding MPFR.  Strangely, parameter_2.f90 compiles fine outside
of the testsuite.

UNTESTED: gfortran.fortran-torture/execute/parameter_2.f90 execution,  -O0 
Executing on host: /home/kargl/gcc/obj/gcc/testsuite/../gfortran -B/home/kargl/g
cc/obj/gcc/testsuite/../ /home/kargl/gcc/gcc/gcc/testsuite/gfortran.fortran-tort
ure/execute/parameter_2.f90  -w  -O1   -L/home/kargl/gcc/obj/i386-unknown-freebs
d5.2/./libgfortran/.libs -L/home/kargl/gcc/obj/i386-unknown-freebsd5.2/./libiber
ty  -lm   -o /home/kargl/gcc/obj/gcc/testsuite/parameter_2.x    (timeout = 300)
cmp.c:39: GNU MP assertion failed: !(((b)->_mpfr_size >> 30) & 1)
/home/kargl/gcc/gcc/gcc/testsuite/gfortran.fortran-torture/execute/parameter_2.f
90:0: internal compiler error: Abort trap
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.
compiler exited with status 1
output is:
cmp.c:39: GNU MP assertion failed: !(((b)->_mpfr_size >> 30) & 1)
/home/kargl/gcc/gcc/gcc/testsuite/gfortran.fortran-torture/execute/parameter_2.f
90:0: internal compiler error: Abort trap
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.


-- 
Steve