https://gcc.gnu.org/bugzilla/show_bug.cgi?id=80164

kargl at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |kargl at gcc dot gnu.org

--- Comment #2 from kargl at gcc dot gnu.org ---
Index: trans-stmt.c
===================================================================
--- trans-stmt.c        (revision 246099)
+++ trans-stmt.c        (working copy)
@@ -452,7 +452,11 @@ gfc_trans_call (gfc_code * code, bool de
         subscripts.  This could be prevented in the elemental case
         as temporaries are handled separatedly
         (below in gfc_conv_elemental_dependencies).  */
-      gfc_conv_loop_setup (&loop, &code->expr1->where);
+      if (code->expr1)
+       gfc_conv_loop_setup (&loop, &code->expr1->where);
+      else
+       gfc_conv_loop_setup (&loop, &code->loc);
+
       gfc_mark_ss_chain_used (ss, 1);

       /* Convert the arguments, checking for dependencies.  */

Reply via email to