aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran
diff options
context:
space:
mode:
authorJakub Jelinek <jakub@redhat.com>2017-02-28 16:25:19 +0100
committerJakub Jelinek <jakub@gcc.gnu.org>2017-02-28 16:25:19 +0100
commit324ff1a07f9ddde87f91acfa7b16a3c24ba6895c (patch)
tree68c599de8fbc088feb2c6b53509d06af0157d3e0 /gcc/fortran
parentc5c78a527d98118e8ee8a098627a3f3f00307bd2 (diff)
downloadgcc-324ff1a07f9ddde87f91acfa7b16a3c24ba6895c.zip
gcc-324ff1a07f9ddde87f91acfa7b16a3c24ba6895c.tar.gz
gcc-324ff1a07f9ddde87f91acfa7b16a3c24ba6895c.tar.bz2
i386.c: Include intl.h.
* config/i386/i386.c: Include intl.h. (ix86_option_override_internal): Use cond ? G_("...") : G_("...") instead of just cond ? "..." : "...". * config/nvptx/nvptx.c (nvptx_goacc_validate_dims): Likewise. * coverage.c (read_counts_file): Likewise. * omp-offload.c: Include intl.h. (oacc_loop_fixed_partitions): Use cond ? G_("...") : G_("...") instead of just cond ? "..." : "...". * gcov.c (read_count_file): Use cond ? N_("...") : N_("...") instead of just cond ? "..." : "...". c/ * c-parser.c (c_parser_asm_statement): Use cond ? G_("...") : G_("...") instead of just cond ? "..." : "...". (c_parser_oacc_enter_exit_data): Use %s and ternary operator only for "enter"/"exit" keyword. (c_finish_oacc_routine): Don't use %s to supply portions of the message. cp/ * decl.c (find_decomp_class_base): Use cond ? G_("...") : G_("...") instead of just cond ? "..." : "...". (grokdeclarator): Likewise. (build_enumerator): Likewise. * init.c (build_new_1): Likewise. * call.c (build_new_method_call_1): Likewise. * parser.c: Include intl.h. (cp_parser_oacc_enter_exit_data): Use %s and ternary operator only for "enter"/"exit" keyword. (cp_finalize_oacc_routine): Don't use %s to supply portions of the message. fortran/ * parse.c (parse_critical_block): Use cond ? G_("...") : G_("...") instead of just cond ? "..." : "...". * scanner.c (gfc_next_char_literal): Likewise. * match.c (match_exit_cycle): Likewise. From-SVN: r245778
Diffstat (limited to 'gcc/fortran')
-rw-r--r--gcc/fortran/ChangeLog7
-rw-r--r--gcc/fortran/match.c4
-rw-r--r--gcc/fortran/parse.c4
-rw-r--r--gcc/fortran/scanner.c18
4 files changed, 21 insertions, 12 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index e3af1c5..e9432d2 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,10 @@
+2017-02-28 Jakub Jelinek <jakub@redhat.com>
+
+ * parse.c (parse_critical_block): Use cond ? G_("...") : G_("...")
+ instead of just cond ? "..." : "...".
+ * scanner.c (gfc_next_char_literal): Likewise.
+ * match.c (match_exit_cycle): Likewise.
+
2017-02-26 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/51119
diff --git a/gcc/fortran/match.c b/gcc/fortran/match.c
index 003a043..fc37f22 100644
--- a/gcc/fortran/match.c
+++ b/gcc/fortran/match.c
@@ -2731,8 +2731,8 @@ match_exit_cycle (gfc_statement st, gfc_exec_op op)
if (o != NULL)
{
gfc_error (is_oacc (p)
- ? "%s statement at %C leaving OpenACC structured block"
- : "%s statement at %C leaving OpenMP structured block",
+ ? G_("%s statement at %C leaving OpenACC structured block")
+ : G_("%s statement at %C leaving OpenMP structured block"),
gfc_ascii_statement (st));
return MATCH_ERROR;
}
diff --git a/gcc/fortran/parse.c b/gcc/fortran/parse.c
index 3809ec1..3c568ee 100644
--- a/gcc/fortran/parse.c
+++ b/gcc/fortran/parse.c
@@ -4340,8 +4340,8 @@ parse_critical_block (void)
for (sd = gfc_state_stack; sd; sd = sd->previous)
if (sd->state == COMP_OMP_STRUCTURED_BLOCK)
gfc_error_now (is_oacc (sd)
- ? "CRITICAL block inside of OpenACC region at %C"
- : "CRITICAL block inside of OpenMP region at %C");
+ ? G_("CRITICAL block inside of OpenACC region at %C")
+ : G_("CRITICAL block inside of OpenMP region at %C"));
s.ext.end_do_label = new_st.label1;
diff --git a/gcc/fortran/scanner.c b/gcc/fortran/scanner.c
index 9a0f918..82f431d 100644
--- a/gcc/fortran/scanner.c
+++ b/gcc/fortran/scanner.c
@@ -1406,10 +1406,11 @@ restart:
if (i == 4)
old_loc = gfc_current_locus;
}
- gfc_error (is_openmp ? "Wrong OpenACC continuation at %C: "
- "expected !$ACC, got !$OMP"
- : "Wrong OpenMP continuation at %C: "
- "expected !$OMP, got !$ACC");
+ gfc_error (is_openmp
+ ? G_("Wrong OpenACC continuation at %C: "
+ "expected !$ACC, got !$OMP")
+ : G_("Wrong OpenMP continuation at %C: "
+ "expected !$OMP, got !$ACC"));
}
if (c != '&')
@@ -1502,10 +1503,11 @@ restart:
if (gfc_wide_tolower (c) != (unsigned char) "*$acc"[i])
is_openmp = 1;
}
- gfc_error (is_openmp ? "Wrong OpenACC continuation at %C: "
- "expected !$ACC, got !$OMP"
- : "Wrong OpenMP continuation at %C: "
- "expected !$OMP, got !$ACC");
+ gfc_error (is_openmp
+ ? G_("Wrong OpenACC continuation at %C: "
+ "expected !$ACC, got !$OMP")
+ : G_("Wrong OpenMP continuation at %C: "
+ "expected !$OMP, got !$ACC"));
}
else if (!openmp_flag && !openacc_flag)
for (i = 0; i < 5; i++)