update_class_location

static void
update_class_location(tree cls, location_t new_location)
{
  tree instantiations, tmpl_info, tmpl_decl;
  DECL_SOURCE_LOCATION (TYPE_NAME (cls)) = new_location;
  if ((tmpl_info = CLASSTYPE_TEMPLATE_INFO (cls)))
    {
      tmpl_decl = TI_TEMPLATE (tmpl_info);
      for (instantiations = DECL_TEMPLATE_INSTANTIATIONS (tmpl_decl);
           instantiations;
           instantiations = TREE_CHAIN (instantiations))
        {
          tree inst_decl = TYPE_NAME (TREE_VALUE (instantiations));
          if (COMPLETE_TYPE_P (inst_decl))
            continue;
          DECL_SOURCE_LOCATION (inst_decl) = new_location;
        }
    }
}