diff options
Diffstat (limited to 'gcc/fortran')
-rw-r--r-- | gcc/fortran/ChangeLog | 11 | ||||
-rw-r--r-- | gcc/fortran/decl.c | 2 | ||||
-rw-r--r-- | gcc/fortran/intrinsic.texi | 48 | ||||
-rw-r--r-- | gcc/fortran/lang.opt | 4 | ||||
-rw-r--r-- | gcc/fortran/openmp.c | 6 |
5 files changed, 41 insertions, 30 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 36e4555..831b968 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,14 @@ +2017-01-09 Jakub Jelinek <jakub@redhat.com> + + PR translation/79019 + PR translation/79020 + * decl.c (attr_decl1): Fix spelling in translatable string. + * intrinsic.texi: Fix spelling - invokation -> invocation. + * lang.opt (faggressive-function-elimination, gfc_convert): Fix + typos in descriptions. + * openmp.c (resolve_omp_clauses): Add missing whitespace to + translatable strings. + 2017-01-08 Martin Sebor <msebor@redhat.com> PR tree-optimization/78913 diff --git a/gcc/fortran/decl.c b/gcc/fortran/decl.c index 22fc444..41acc94 100644 --- a/gcc/fortran/decl.c +++ b/gcc/fortran/decl.c @@ -7127,7 +7127,7 @@ attr_decl1 (void) if (current_attr.dimension && sym->value) { gfc_error ("Dimensions specified for %s at %L after its " - "initialisation", sym->name, &var_locus); + "initialization", sym->name, &var_locus); m = MATCH_ERROR; goto cleanup; } diff --git a/gcc/fortran/intrinsic.texi b/gcc/fortran/intrinsic.texi index dbf03c6..c1de29e 100644 --- a/gcc/fortran/intrinsic.texi +++ b/gcc/fortran/intrinsic.texi @@ -1850,8 +1850,8 @@ Inverse function: @ref{TANH} @table @asis @item @emph{Description}: @code{ATOMIC_ADD(ATOM, VALUE)} atomically adds the value of @var{VAR} to the -variable @var{ATOM}. When @var{STAT} is present and the invokation was -successful, it is assigned the value 0. If it is present and the invokation +variable @var{ATOM}. When @var{STAT} is present and the invocation was +successful, it is assigned the value 0. If it is present and the invocation has failed, it is assigned a positive value; in particular, for a coindexed @var{ATOM}, if the remote image has stopped, it is assigned the value of @code{ISO_FORTRAN_ENV}'s @code{STAT_STOPPED_IMAGE} and if the remote image has @@ -1901,8 +1901,8 @@ end program atomic @item @emph{Description}: @code{ATOMIC_AND(ATOM, VALUE)} atomically defines @var{ATOM} with the bitwise AND between the values of @var{ATOM} and @var{VALUE}. When @var{STAT} is present -and the invokation was successful, it is assigned the value 0. If it is present -and the invokation has failed, it is assigned a positive value; in particular, +and the invocation was successful, it is assigned the value 0. If it is present +and the invocation has failed, it is assigned a positive value; in particular, for a coindexed @var{ATOM}, if the remote image has stopped, it is assigned the value of @code{ISO_FORTRAN_ENV}'s @code{STAT_STOPPED_IMAGE} and if the remote image has failed, the value @code{STAT_FAILED_IMAGE}. @@ -1951,8 +1951,8 @@ end program atomic @code{ATOMIC_CAS} compares the variable @var{ATOM} with the value of @var{COMPARE}; if the value is the same, @var{ATOM} is set to the value of @var{NEW}. Additionally, @var{OLD} is set to the value of @var{ATOM} -that was used for the comparison. When @var{STAT} is present and the invokation -was successful, it is assigned the value 0. If it is present and the invokation +that was used for the comparison. When @var{STAT} is present and the invocation +was successful, it is assigned the value 0. If it is present and the invocation has failed, it is assigned a positive value; in particular, for a coindexed @var{ATOM}, if the remote image has stopped, it is assigned the value of @code{ISO_FORTRAN_ENV}'s @code{STAT_STOPPED_IMAGE} and if the remote image has @@ -2003,8 +2003,8 @@ end program atomic @table @asis @item @emph{Description}: @code{ATOMIC_DEFINE(ATOM, VALUE)} defines the variable @var{ATOM} with the value -@var{VALUE} atomically. When @var{STAT} is present and the invokation was -successful, it is assigned the value 0. If it is present and the invokation +@var{VALUE} atomically. When @var{STAT} is present and the invocation was +successful, it is assigned the value 0. If it is present and the invocation has failed, it is assigned a positive value; in particular, for a coindexed @var{ATOM}, if the remote image has stopped, it is assigned the value of @code{ISO_FORTRAN_ENV}'s @code{STAT_STOPPED_IMAGE} and if the remote image has @@ -2055,8 +2055,8 @@ end program atomic @item @emph{Description}: @code{ATOMIC_FETCH_ADD(ATOM, VALUE, OLD)} atomically stores the value of @var{ATOM} in @var{OLD} and adds the value of @var{VAR} to the -variable @var{ATOM}. When @var{STAT} is present and the invokation was -successful, it is assigned the value 0. If it is present and the invokation +variable @var{ATOM}. When @var{STAT} is present and the invocation was +successful, it is assigned the value 0. If it is present and the invocation has failed, it is assigned a positive value; in particular, for a coindexed @var{ATOM}, if the remote image has stopped, it is assigned the value of @code{ISO_FORTRAN_ENV}'s @code{STAT_STOPPED_IMAGE} and if the remote image has @@ -2108,8 +2108,8 @@ end program atomic @item @emph{Description}: @code{ATOMIC_AND(ATOM, VALUE)} atomically stores the value of @var{ATOM} in @var{OLD} and defines @var{ATOM} with the bitwise AND between the values of -@var{ATOM} and @var{VALUE}. When @var{STAT} is present and the invokation was -successful, it is assigned the value 0. If it is present and the invokation has +@var{ATOM} and @var{VALUE}. When @var{STAT} is present and the invocation was +successful, it is assigned the value 0. If it is present and the invocation has failed, it is assigned a positive value; in particular, for a coindexed @var{ATOM}, if the remote image has stopped, it is assigned the value of @code{ISO_FORTRAN_ENV}'s @code{STAT_STOPPED_IMAGE} and if the remote image has @@ -2159,8 +2159,8 @@ end program atomic @item @emph{Description}: @code{ATOMIC_OR(ATOM, VALUE)} atomically stores the value of @var{ATOM} in @var{OLD} and defines @var{ATOM} with the bitwise OR between the values of -@var{ATOM} and @var{VALUE}. When @var{STAT} is present and the invokation was -successful, it is assigned the value 0. If it is present and the invokation has +@var{ATOM} and @var{VALUE}. When @var{STAT} is present and the invocation was +successful, it is assigned the value 0. If it is present and the invocation has failed, it is assigned a positive value; in particular, for a coindexed @var{ATOM}, if the remote image has stopped, it is assigned the value of @code{ISO_FORTRAN_ENV}'s @code{STAT_STOPPED_IMAGE} and if the remote image has @@ -2210,8 +2210,8 @@ end program atomic @item @emph{Description}: @code{ATOMIC_XOR(ATOM, VALUE)} atomically stores the value of @var{ATOM} in @var{OLD} and defines @var{ATOM} with the bitwise XOR between the values of -@var{ATOM} and @var{VALUE}. When @var{STAT} is present and the invokation was -successful, it is assigned the value 0. If it is present and the invokation has +@var{ATOM} and @var{VALUE}. When @var{STAT} is present and the invocation was +successful, it is assigned the value 0. If it is present and the invocation has failed, it is assigned a positive value; in particular, for a coindexed @var{ATOM}, if the remote image has stopped, it is assigned the value of @code{ISO_FORTRAN_ENV}'s @code{STAT_STOPPED_IMAGE} and if the remote image has @@ -2261,8 +2261,8 @@ end program atomic @item @emph{Description}: @code{ATOMIC_OR(ATOM, VALUE)} atomically defines @var{ATOM} with the bitwise AND between the values of @var{ATOM} and @var{VALUE}. When @var{STAT} is present -and the invokation was successful, it is assigned the value 0. If it is present -and the invokation has failed, it is assigned a positive value; in particular, +and the invocation was successful, it is assigned the value 0. If it is present +and the invocation has failed, it is assigned a positive value; in particular, for a coindexed @var{ATOM}, if the remote image has stopped, it is assigned the value of @code{ISO_FORTRAN_ENV}'s @code{STAT_STOPPED_IMAGE} and if the remote image has failed, the value @code{STAT_FAILED_IMAGE}. @@ -2310,8 +2310,8 @@ end program atomic @item @emph{Description}: @code{ATOMIC_DEFINE(ATOM, VALUE)} atomically assigns the value of the variable @var{ATOM} to @var{VALUE}. When @var{STAT} is present and the -invokation was successful, it is assigned the value 0. If it is present and the -invokation has failed, it is assigned a positive value; in particular, for a +invocation was successful, it is assigned the value 0. If it is present and the +invocation has failed, it is assigned a positive value; in particular, for a coindexed @var{ATOM}, if the remote image has stopped, it is assigned the value of @code{ISO_FORTRAN_ENV}'s @code{STAT_STOPPED_IMAGE} and if the remote image has failed, the value @code{STAT_FAILED_IMAGE}. @@ -2367,8 +2367,8 @@ end program atomic @item @emph{Description}: @code{ATOMIC_AND(ATOM, VALUE)} atomically defines @var{ATOM} with the bitwise XOR between the values of @var{ATOM} and @var{VALUE}. When @var{STAT} is present -and the invokation was successful, it is assigned the value 0. If it is present -and the invokation has failed, it is assigned a positive value; in particular, +and the invocation was successful, it is assigned the value 0. If it is present +and the invocation has failed, it is assigned a positive value; in particular, for a coindexed @var{ATOM}, if the remote image has stopped, it is assigned the value of @code{ISO_FORTRAN_ENV}'s @code{STAT_STOPPED_IMAGE} and if the remote image has failed, the value @code{STAT_FAILED_IMAGE}. @@ -5535,8 +5535,8 @@ end program test_etime @item @emph{Description}: @code{EVENT_QUERY} assignes the number of events to @var{COUNT} which have been posted to the @var{EVENT} variable and not yet been removed by calling -@code{EVENT WAIT}. When @var{STAT} is present and the invokation was successful, -it is assigned the value 0. If it is present and the invokation has failed, +@code{EVENT WAIT}. When @var{STAT} is present and the invocation was successful, +it is assigned the value 0. If it is present and the invocation has failed, it is assigned a positive value and @var{COUNT} is assigned the value @math{-1}. @item @emph{Standard}: diff --git a/gcc/fortran/lang.opt b/gcc/fortran/lang.opt index 8f5883d..9670bf7 100644 --- a/gcc/fortran/lang.opt +++ b/gcc/fortran/lang.opt @@ -359,7 +359,7 @@ Fortran Joined faggressive-function-elimination Fortran Var(flag_aggressive_function_elimination) -Eliminate multiple function invokations also for impure functions. +Eliminate multiple function invocations also for impure functions. falign-commons Fortran Var(flag_align_commons) Init(1) @@ -398,7 +398,7 @@ Fortran RejectNegative Joined Enum(gfc_convert) Var(flag_convert) Init(GFC_FLAG_ -fconvert=<big-endian|little-endian|native|swap> The endianness used for unformatted files. Enum -Name(gfc_convert) Type(enum gfc_convert) UnknownError(Unrecognized option to endianess value: %qs) +Name(gfc_convert) Type(enum gfc_convert) UnknownError(Unrecognized option to endianness value: %qs) EnumValue Enum(gfc_convert) String(big-endian) Value(GFC_FLAG_CONVERT_BIG) diff --git a/gcc/fortran/openmp.c b/gcc/fortran/openmp.c index 4c5a184..16b75fd 100644 --- a/gcc/fortran/openmp.c +++ b/gcc/fortran/openmp.c @@ -3967,7 +3967,7 @@ resolve_omp_clauses (gfc_code *code, gfc_omp_clauses *omp_clauses, &expr->where); else if (if_without_mod) { - gfc_error ("IF clause without modifier at %L used together with" + gfc_error ("IF clause without modifier at %L used together with " "IF clauses with modifiers", &omp_clauses->if_expr->where); if_without_mod = false; @@ -4316,7 +4316,7 @@ resolve_omp_clauses (gfc_code *code, gfc_omp_clauses *omp_clauses, if (!gfc_resolve_expr (n->expr) || n->expr->ts.type != BT_INTEGER || n->expr->rank != 0) - gfc_error ("SINK addend not a constant integer" + gfc_error ("SINK addend not a constant integer " "at %L", &n->where); } continue; @@ -4627,7 +4627,7 @@ resolve_omp_clauses (gfc_code *code, gfc_omp_clauses *omp_clauses, linear_op = n->u.linear_op; } else if (omp_clauses->orderedc) - gfc_error ("LINEAR clause specified together with" + gfc_error ("LINEAR clause specified together with " "ORDERED clause with argument at %L", &n->where); else if (n->u.linear_op != OMP_LINEAR_REF |