Fix a regression in debug metadata

Fix an issue which blocked the local binding that
connects the !DILocalVariable to @llvm.dbg.declare. It
was introduced in 7da0254 which intended to eliminate
spurious local variables in the DWARF. This fix keeps
the compiler created variable's name unexposed to the
DWARF and restores the local binding as well.

Author: gklimowicz

tools/flang2/flang2exe/cgmain.cpp

@@ -10334,7 +10334,7 @@ needDebugInfoFilt(SPTR sptr)
     return true;
   /* Fortran case needs to be revisited when we start to support debug, for now
    * just the obvious case */
-  return (!CCSYMG(sptr) || (DCLDG(sptr) && (STYPEG(sptr) == ST_ARRAY)));
+  return (!CCSYMG(sptr) || DCLDG(sptr));
 }
 #ifdef OMP_OFFLOAD_LLVM
 INLINE static bool

tools/flang2/flang2exe/lldebug.cpp

@@ -1113,7 +1113,10 @@ lldbg_create_local_variable_mdnode(LL_DebugInfo *db, int dw_tag,
   if (!ll_feature_debug_info_ver38(&db->module->ir))
     llmd_add_i32(mdb, make_dwtag(db, dw_tag));
   llmd_add_md(mdb, context);
-  llmd_add_string(mdb, name);
+  if (flags & DIFLAG_ARTIFICIAL)
+    llmd_add_string(mdb, ""); // Do not expose the name of compiler created variable.
+  else
+    llmd_add_string(mdb, name);
   if (!ll_feature_dbg_local_variable_embeds_argnum(&db->module->ir))
     llmd_add_i32(mdb, argnum);
   llmd_add_md(mdb, fileref);