+2018-09-25 Martin Liska <mliska@suse.cz>
+
+ PR fortran/87394
+ * dbgcnt.c (dbg_cnt_process_single_pair): Return false
+ instead of NULL.
+ * dumpfile.c (dump_enable_all): Remove extra parenthesis.
+ * gcov-tool.c: Declare the function with ATTRIBUTE_NORETURN.
+ * godump.c (go_format_type): Remove extra parenthesis.
+
2018-09-25 Martin Liska <mliska@suse.cz>
* alias.c (set_dest_equal_p): Remove unused function.
int high, low;
if (value1 == NULL)
- return NULL;
+ return false;
if (value2 == NULL)
{
for (i = TDI_none + 1; i < (size_t) TDI_end; i++)
{
- if ((dump_files[i].dkind == dkind))
+ if (dump_files[i].dkind == dkind)
{
const char *old_filename = dump_files[i].pfilename;
dump_files[i].pstate = -1;
for (i = 0; i < m_extra_dump_files_in_use; i++)
{
- if ((m_extra_dump_files[i].dkind == dkind))
+ if (m_extra_dump_files[i].dkind == dkind)
{
const char *old_filename = m_extra_dump_files[i].pfilename;
m_extra_dump_files[i].pstate = -1;
+2018-09-25 Martin Liska <mliska@suse.cz>
+
+ PR fortran/87394
+ * decl.c (add_hidden_procptr_result): Simplify condition
+ as we are in branch witch 'case1 || case2'.
+
2018-09-25 Martin Liska <mliska@suse.cz>
* trans.c (remove_suffix): Remove
gfc_symtree *stree;
if (case1)
gfc_get_sym_tree ("ppr@", gfc_current_ns, &stree, false);
- else if (case2)
+ else
{
gfc_symtree *st2;
gfc_get_sym_tree ("ppr@", gfc_current_ns->parent, &stree, false);
/* Print overlap usage and exit. */
-static void
+static void ATTRIBUTE_NORETURN
overlap_usage (void)
{
fnotice (stderr, "Overlap subcomand usage:");
unions. */
if (!is_anon_substructure)
{
- if ((DECL_NAME (field) == NULL))
+ if (DECL_NAME (field) == NULL)
*p_art_i = go_append_artificial_name (ob, *p_art_i);
else
go_append_decl_name