Re: [PATCH] PR fortran/65173 -- kill off old_cl_list from gfc_namespace.

[Paul Richard Thomas <paul dot richard dot thomas at gmail dot com>]

Hi Steve,

In doing the final regtest of the fix for PR44265, I found that
charlen_15.f90 is still giving the original error for PR78350.

module.c:3419 is seeing (after continuing three times)
(gdb) print *e->ts.u.cl->length
$12 = {expr_type = 0, ts = {type = 81, kind = 0, u = {derived = 0x20ff570,
      cl = 0x20ff570, pad = 34600304}, interface = 0x20ff340,
    is_c_interop = 0, is_iso_c = 0, f90_type = BT_UNKNOWN, deferred = false},
  rank = 0, shape = 0x20fe310, symtree = 0x0, ref = 0x0, where = {
    nextc = 0x50, lb = 0x50}, base_expr = 0x20fe5e0, is_boz = 0, is_snan = 0,
  error = 0, user_operator = 0, mold = 0, must_finalize = 0, representation = {
    length = 4096, string = 0x7ffff1a68000 "\002"}, value = {logical = 471,
    iokind = 471, integer = {{_mp_alloc = 471, _mp_size = 0,
        _mp_d = 0x41006600000000}}, real = {{_mpfr_prec = 471, _mpfr_sign = 0,
        _mpfr_exp = -1, _mpfr_d = 0x7fffffffff}}, complex = {{re = {{
            _mpfr_prec = 471, _mpfr_sign = 0, _mpfr_exp = -1,
            _mpfr_d = 0x7fffffffff}}, im = {{_mpfr_prec = 0, _mpfr_sign = 241,
            _mpfr_exp = 214358001816, _mpfr_d = 0x2100100}}}}, op = {op = 471,
      uop = 0x41006600000000, op1 = 0xffffffffffffffff, op2 = 0x7fffffffff},
    function = {actual = 0x1d7,
      name = 0x41006600000000 <Address 0x41006600000000 out of bounds>,
      isym = 0xffffffffffffffff, esym = 0x7fffffffff}, compcall = {
      actual = 0x1d7,
      name = 0x41006600000000 <Address 0x41006600000000 out of bounds>,
      base_object = 0xffffffffffffffff, tbp = 0x7fffffffff, ignore_pass = 0,
      assign = 0}, character = {length = 471, string = 0x41006600000000},
    constructor = 0x1d7}}

It is the expr_type == = that causes the ICE in gfc_code2string.

Cheers

Paul

On 8 December 2016 at 22:33, Steve Kargl
<sgk@troutmask.apl.washington.edu> wrote:
> On Thu, Dec 08, 2016 at 07:58:37AM +0100, Paul Richard Thomas wrote:
>>
>> "Accidence" == state of fixing non-deterministic ICEs? :-)
>>
>> OK for trunk.
>>
>> Thanks for dealing with this kind of dead wood.
>>
>
> Committed revision 243463.
>
> --
> Steve



-- 
If you're walking down the right path and you're willing to keep
walking, eventually you'll make progress.

Barack Obama