+2016-09-26 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
+
+ * config/i386/i386.c (ix86_print_operand)
+ [HAVE_AS_IX86_CMOV_SUN_SYNTAX]: Add gcc_fallthrough.
+ * config/sparc/sparc.c (check_pic): Add fallthrough comment.
+ (epilogue_renumber): Likewise.
+
2016-09-26 Kugan Vivekanandarajah <kuganv@linaro.org>
PR middle-end/77719
+2016-09-26 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
+
+ * gcc-interface/decl.c: Fix fall through comment formatting.
+ * gcc-interface/misc.c: Likewise.
+ * gcc-interface/trans.c: Likewise.
+ * gcc-interface/utils.c: Likewise.
+ * gcc-interface/utils2.c: Likewise.
+
2016-09-23 Jakub Jelinek <jakub@redhat.com>
* gcc-interface/decl.c (gnat_to_gnu_entity): Use
gnu_expr
= gnat_to_gnu_external (Expression (Declaration_Node (gnat_entity)));
- /* ... fall through ... */
+ /* fall through */
case E_Exception:
case E_Loop_Parameter:
break;
}
- /* ... fall through ... */
+ /* fall through */
case E_Record_Subtype:
/* If Cloned_Subtype is Present it means this record subtype has
break;
}
- /* ... fall through ... */
+ /* fall through */
case E_Allocator_Type:
case E_Access_Type:
break;
}
- /* ... fall through ... */
+ /* fall through */
case N_Character_Literal:
case N_Integer_Literal:
else
return Uint_Minus_1;
- /* Fall through... */
+ /* fall through */
default:
return No_Uint;
case OPT_gant:
warning (0, "%<-gnat%> misspelled as %<-gant%>");
- /* ... fall through ... */
+ /* fall through */
case OPT_gnat:
case OPT_gnatO:
else
print_node (file, "index type", TYPE_INDEX_TYPE (node), indent + 4);
- /* ... fall through ... */
+ /* fall through */
case ENUMERAL_TYPE:
case BOOLEAN_TYPE:
print_node_brief (file, "RM size", TYPE_RM_SIZE (node), indent + 4);
- /* ... fall through ... */
+ /* fall through */
case REAL_TYPE:
print_node_brief (file, "RM min", TYPE_RM_MIN_VALUE (node), indent + 4);
&& Ekind (Entity (gnat_temp)) == E_Enumeration_Literal))
return 1;
- /* ... fall through ... */
+ /* fall through */
case N_Slice:
/* Only the array expression can require an lvalue. */
if (!constant)
return 1;
- /* ... fall through ... */
+ /* fall through */
case N_Type_Conversion:
case N_Qualified_Expression:
get_unpadded_type (Etype (gnat_parent)),
true, false, true);
- /* ... fall through ... */
+ /* fall through */
default:
return 0;
break;
}
- /* ... fall through ... */
+ /* fall through */
case Attr_Access:
case Attr_Unchecked_Access:
break;
}
- /* ... fall through ... */
+ /* fall through */
case Attr_Length:
{
/* We treat Model as identical to Machine. This is true for at least
IEEE and some other nice floating-point systems. */
- /* ... fall through ... */
+ /* fall through */
case Attr_Machine:
/* The trick is to force the compiler to store the result in memory so
break;
}
- /* ... fall through ... */
+ /* fall through */
case N_Character_Literal:
case N_Integer_Literal:
&& Has_Atomic_Components (Entity (Prefix (gnat_node))))
return true;
- /* ... fall through ... */
+ /* fall through */
case N_Explicit_Dereference:
return Is_Atomic (Etype (gnat_node));
/* Nothing to do if we are the prefix of an attribute, since we do not
want an atomic access for things like 'Size. */
- /* ... fall through ... */
+ /* fall through */
case N_Reference:
/* The N_Reference node is like an attribute. */
break;
}
- /* ... fall through ... */
+ /* fall through */
case N_Op_Eq:
case N_Op_Ne:
break;
}
- /* ... fall through ... */
+ /* fall through */
case N_Op_Minus:
case N_Op_Abs:
break;
}
- /* ... fall through ... */
+ /* fall through */
default:
return GS_UNHANDLED;
if (EXPR_P (TREE_OPERAND (node, 1)))
set_gnu_expr_location_from_node (TREE_OPERAND (node, 1), gnat_node);
- /* ... fall through ... */
+ /* fall through */
default:
if (!REFERENCE_CLASS_P (node) && !EXPR_HAS_LOCATION (node))
NULL_TREE, NULL_TREE),
ATTR_FLAG_TYPE_IN_PLACE);
- /* ... fall through ... */
+ /* fall through */
case is_enabled:
DECL_DECLARED_INLINE_P (subprog_decl) = 1;
return expr;
}
+ /* fall through */
+
case CONSTRUCTOR:
/* If we are converting a CONSTRUCTOR to a mere type variant, or to
another padding type around the same type, just make a new one in
convert (TREE_TYPE (type),
TYPE_MIN_VALUE (type))));
- /* ... fall through ... */
+ /* fall through */
case ENUMERAL_TYPE:
case BOOLEAN_TYPE:
return gnat_build_constructor (type, v);
}
- /* ... fall through ... */
+ /* fall through */
case ARRAY_TYPE:
/* In these cases, assume the front-end has validated the conversion.
break;
}
- /* ... fall through ... */
+ /* fall through */
case NON_LVALUE_EXPR:
return fold_build1 (code, sizetype,
return known_alignment (t);
}
- /* ... fall through ... */
+ /* fall through */
default:
/* For other pointer expressions, we assume that the pointed-to object
if (!operation_type)
operation_type = TREE_TYPE (left_type);
- /* ... fall through ... */
+ /* fall through */
case ARRAY_RANGE_REF:
/* First look through conversion between type variants. Note that
op_code = MINUS_EXPR;
modulus = NULL_TREE;
- /* ... fall through ... */
+ /* fall through */
case PLUS_EXPR:
case MINUS_EXPR:
= gnat_type_for_mode (TYPE_MODE (operation_type),
TYPE_UNSIGNED (operation_type));
- /* ... fall through ... */
+ /* fall through */
default:
common:
return build_unary_op (ADDR_EXPR, result_type,
TREE_OPERAND (operand, 0));
- /* ... fallthru ... */
+ /* fallthru */
case VIEW_CONVERT_EXPR:
/* If this just a variant conversion or if the conversion doesn't
case CONST_DECL:
operand = DECL_CONST_CORRESPONDING_VAR (operand);
- /* ... fall through ... */
+ /* fall through */
default:
common:
}
}
- /* ... fall through ... */
+ /* fall through */
default:
gcc_assert (operation_type == base_type);
#ifdef HAVE_AS_IX86_CMOV_SUN_SYNTAX
if (ASSEMBLER_DIALECT == ASM_ATT)
putc ('.', file);
+ gcc_fallthrough ();
#endif
case 'C':
|| (GET_CODE (XEXP (op, 0)) == MINUS
&& XEXP (XEXP (op, 0), 0) == sparc_got ()
&& GET_CODE (XEXP (XEXP (op, 0), 1)) == CONST)));
+ /* fallthrough */
case 2:
default:
return 1;
return 1;
if (! test && REGNO (*where) >= 24 && REGNO (*where) < 32)
*where = gen_rtx_REG (GET_MODE (*where), OUTGOING_REGNO (REGNO(*where)));
+ /* fallthrough */
case SCRATCH:
case CC0:
case PC:
projects / gcc.git / commitdiff