]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
Fortran: resolve.c - remove '*XCNEW' based nullifying
authorTobias Burnus <tobias@codesourcery.com>
Mon, 14 Jun 2021 12:36:20 +0000 (14:36 +0200)
committerTobias Burnus <tobias@codesourcery.com>
Mon, 14 Jun 2021 12:44:23 +0000 (14:44 +0200)
gcc/fortran/ChangeLog:

* resolve.c (resolve_variable): Remove *XCNEW used to
nullify nullified memory.

gcc/fortran/resolve.c

index a37ad66564575d6c83ff771e5fc7f73d0d3b2b7c..45c3ad387ac01d2a107cc0d5d34b822f7e4fcc26 100644 (file)
@@ -5709,7 +5709,6 @@ resolve_variable (gfc_expr *e)
             part_ref.  */
          gfc_ref *ref = gfc_get_ref ();
          ref->type = REF_ARRAY;
-         ref->u.ar = *gfc_get_array_ref();
          ref->u.ar.type = AR_FULL;
          if (sym->as)
            {