diff options
| author | Martin Liska <mliska@suse.cz> | 2019-03-12 16:11:42 +0100 |
|---|---|---|
| committer | Martin Liska <marxin@gcc.gnu.org> | 2019-03-12 15:11:42 +0000 |
| commit | 1fe61adfcc44c4e6bf4b02f1d4043ba708b2953d (patch) | |
| tree | fb5191a672ee34e225f0c4142a36b3901c48649a /gcc/fortran/decl.c | |
| parent | 0e3088806577e8050d6cc10215196d5f57cb5aa4 (diff) | |
| download | gcc-1fe61adfcc44c4e6bf4b02f1d4043ba708b2953d.zip gcc-1fe61adfcc44c4e6bf4b02f1d4043ba708b2953d.tar.gz gcc-1fe61adfcc44c4e6bf4b02f1d4043ba708b2953d.tar.bz2 | |
Replace can't in error messages for Fortran.
2019-03-12 Martin Liska <mliska@suse.cz>
* c-opts.c (c_common_handle_option): Wrap option with %< and %>.
2019-03-12 Martin Liska <mliska@suse.cz>
* decl.c (add_init_expr_to_sym): Replace usage of 'can't'
with 'cannot'.
(variable_decl): Likewise.
(cray_pointer_decl): Likewise.
(match_binding_attributes): Likewise.
* f95-lang.c (gfc_init): Likewise.
* interface.c (gfc_check_typebound_override): Likewise.
* intrinsic.c (make_generic): Likewise.
* module.c (dump_module): Likewise.
(gfc_use_module): Likewise.
* primary.c (gfc_convert_to_structure_constructor): Likewise.
* resolve.c (resolve_entries): Likewise.
(check_generic_tbp_ambiguity): Likewise.
(get_checked_tb_operator_target): Likewise.
* scanner.c (load_file): Likewise.
* trans-expr.c (gfc_conv_intrinsic_to_class): Likewise.
2019-03-12 Martin Liska <mliska@suse.cz>
* config/i386/i386.c: Reword an error message.
2019-03-12 Martin Liska <mliska@suse.cz>
* gfortran.dg/abstract_type_3.f03: Amend test-case scan
patterns.
* gfortran.dg/binding_label_tests_4.f03: Likewise.
* gfortran.dg/c_f_pointer_tests_6.f90: Likewise.
* gfortran.dg/c_funloc_tests_6.f90: Likewise.
* gfortran.dg/c_loc_tests_17.f90: Likewise.
* gfortran.dg/constructor_9.f90: Likewise.
* gfortran.dg/dec_structure_8.f90: Likewise.
* gfortran.dg/entry_4.f90: Likewise.
* gfortran.dg/init_char_with_nonchar_ctr.f90: Likewise.
* gfortran.dg/initialization_23.f90: Likewise.
* gfortran.dg/logical_assignment_1.f90: Likewise.
* gfortran.dg/pr80752.f90: Likewise.
* gfortran.dg/pr88116_1.f90: Likewise.
* gfortran.dg/pr88467.f90: Likewise.
* gfortran.dg/typebound_call_7.f03: Likewise.
* gfortran.dg/typebound_generic_1.f03: Likewise.
* gfortran.dg/typebound_operator_2.f03: Likewise.
* gfortran.dg/typebound_operator_4.f03: Likewise.
* gfortran.dg/typebound_proc_9.f03: Likewise.
* gfortran.dg/unlimited_polymorphic_2.f03: Likewise.
From-SVN: r269616
Diffstat (limited to 'gcc/fortran/decl.c')
| -rw-r--r-- | gcc/fortran/decl.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/gcc/fortran/decl.c b/gcc/fortran/decl.c index a29e2db..f6411f1 100644 --- a/gcc/fortran/decl.c +++ b/gcc/fortran/decl.c @@ -1978,7 +1978,7 @@ add_init_expr_to_sym (const char *name, gfc_expr **initp, locus *var_locus) if (init->rank == 0) { - gfc_error ("Can't initialize implied-shape array at %L" + gfc_error ("Cannot initialize implied-shape array at %L" " with scalar", &sym->declared_at); return false; } @@ -2490,7 +2490,7 @@ variable_decl (int elem) if (as->type == AS_IMPLIED_SHAPE && current_attr.flavor != FL_PARAMETER) { m = MATCH_ERROR; - gfc_error ("Non-PARAMETER symbol %qs at %L can't be implied-shape", + gfc_error ("Non-PARAMETER symbol %qs at %L cannot be implied-shape", name, &var_locus); goto cleanup; } @@ -2668,7 +2668,7 @@ variable_decl (int elem) else { if (!gfc_set_array_spec (sym, cp_as, &var_locus)) - gfc_internal_error ("Couldn't set pointee array spec."); + gfc_internal_error ("Cannot set pointee array spec."); /* Fix the array spec. */ m = gfc_mod_pointee_as (sym->as); @@ -8538,7 +8538,7 @@ cray_pointer_decl (void) if (cpte->as == NULL) { if (!gfc_set_array_spec (cpte, as, &var_locus)) - gfc_internal_error ("Couldn't set Cray pointee array spec."); + gfc_internal_error ("Cannot set Cray pointee array spec."); } else if (as != NULL) { @@ -10706,7 +10706,7 @@ match_binding_attributes (gfc_typebound_proc* ba, bool generic, bool ppc) /* NON_OVERRIDABLE and DEFERRED exclude themselves. */ if (ba->non_overridable && ba->deferred) { - gfc_error ("NON_OVERRIDABLE and DEFERRED can't both appear at %C"); + gfc_error ("NON_OVERRIDABLE and DEFERRED cannot both appear at %C"); goto error; } |