https://gcc.gnu.org/bugzilla/show_bug.cgi?id=62251
--- Comment #1 from John David Anglin <danglin at gcc dot gnu.org> ---
Test fails at line 58:
if (str3 /= " 1.41421356237309504880168872420969798") call abort()
_gfortrani_compare_string (len1=len1@entry=80,
s1=0x800003fffdff0b90 " 1.41421356237309504880168872420969800", ' '
<repeats 40 times>, "1.41421356237309504880168872420969800", ' ' <repeats 43
times>, s1@entry=<error reading variable: can't compute CFA for this frame>,
len2=len2@entry=40,
s2=s2@entry=0x4000000000001a70 "
1.414213562373095048801688724209697981.41421356237309504880168872420969798")
at ../../../gcc/libgfortran/intrinsics/string_intrinsics_inc.c:85
(gdb) bt
#0 0x800003fffdfd7544 in _gfortrani_compare_string (len1=len1@entry=80,
s1=0x800003fffdff0b90 " 1.41421356237309504880168872420969800", ' '
<repeats 40 times>, "1.41421356237309504880168872420969800", ' ' <repeats 43
times>, s1@entry=<error reading variable: can't compute CFA for this frame>,
len2=len2@entry=40,
s2=s2@entry=0x4000000000001a70 "
1.414213562373095048801688724209697981.41421356237309504880168872420969798")
at ../../../gcc/libgfortran/intrinsics/string_intrinsics_inc.c:85
#1 0x40000000000036c0 in test_qp ()
at /test/gnu/gcc/gcc/gcc/testsuite/gfortran.dg/quad_2.f90:58
#2 0x4000000000003840 in main (argc=<optimized out>, argv=<optimized out>)
at /test/gnu/gcc/gcc/gcc/testsuite/gfortran.dg/quad_2.f90:78
With debug comments removed:
# ./quad_2.exe
> 1.00000000000000000000000000000000000<
>1.00000000000000000000000000000000000<
> 1.41421356237309504880168872420969800<
>1.41421356237309504880168872420969800<
Program aborted. Backtrace:
#0 0xC00000000033D86B
ABORT instruction (core dumped)
