https://gcc.gnu.org/bugzilla/show_bug.cgi?id=90297
Bug ID: 90297
Summary: gcc/fortran/resolve.c: 2 * possibly redundant code ?
Product: gcc
Version: 9.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: dcb314 at hotmail dot com
Target Milestone: ---
1.
trunk/gcc/fortran/resolve.c:6482] -> [trunk/gcc/fortran/resolve.c:6483]:
(style) Assignment 'expr=args->expr' is redundant with condition
'expr==args->expr'.
Source code is
for (args= e->value.function.actual; args; args = args->next)
{
if (expr == args->expr)
expr = args->expr;
}
If X == Y, then X = Y looks pointless to me.
2.
trunk/gcc/fortran/resolve.c:6617] -> [trunk/gcc/fortran/resolve.c:6618]:
(style) Assignment 'expr=args->expr' is redundant with condition
'expr==args->expr'.
Source code is
for (; args; args = args->next)
if (expr == args->expr)
expr = args->expr;
Duplicate.
