diff options
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/fortran/intrinsic.texi | 2 | ||||
| -rw-r--r-- | gcc/fortran/trans-expr.c | 2 | ||||
| -rw-r--r-- | gcc/genautomata.c | 2 | ||||
| -rw-r--r-- | gcc/testsuite/gcc.dg/format/strfmon-1.c | 2 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/char4-subscript.f90 | 2 |
5 files changed, 5 insertions, 5 deletions
diff --git a/gcc/fortran/intrinsic.texi b/gcc/fortran/intrinsic.texi index c9049b53..260dbaa 100644 --- a/gcc/fortran/intrinsic.texi +++ b/gcc/fortran/intrinsic.texi @@ -502,7 +502,7 @@ Inquiry function @item @emph{Arguments}: @multitable @columnfractions .15 .70 @item @var{NAME} @tab Scalar @code{CHARACTER} of default kind with the -file name. Tailing blank are ignored unless the character @code{achar(0)} +file name. Trailing blank are ignored unless the character @code{achar(0)} is present, then all characters up to and excluding @code{achar(0)} are used as file name. @item @var{MODE} @tab Scalar @code{CHARACTER} of default kind with the diff --git a/gcc/fortran/trans-expr.c b/gcc/fortran/trans-expr.c index e3bc886..de406ad 100644 --- a/gcc/fortran/trans-expr.c +++ b/gcc/fortran/trans-expr.c @@ -9513,7 +9513,7 @@ gfc_trans_pointer_assignment (gfc_expr * expr1, gfc_expr * expr2) { gfc_add_data_component (expr2); /* The following is required as gfc_add_data_component doesn't - update ts.type if there is a tailing REF_ARRAY. */ + update ts.type if there is a trailing REF_ARRAY. */ expr2->ts.type = BT_DERIVED; } diff --git a/gcc/genautomata.c b/gcc/genautomata.c index e6295e6..6bbfc68 100644 --- a/gcc/genautomata.c +++ b/gcc/genautomata.c @@ -6787,7 +6787,7 @@ create_automata (void) finish_regexp_representation calls. */ /* This recursive function forms string representation of regexp - (without tailing '\0'). */ + (without trailing '\0'). */ static void form_regexp (regexp_t regexp) { diff --git a/gcc/testsuite/gcc.dg/format/strfmon-1.c b/gcc/testsuite/gcc.dg/format/strfmon-1.c index 934242a..a790db5 100644 --- a/gcc/testsuite/gcc.dg/format/strfmon-1.c +++ b/gcc/testsuite/gcc.dg/format/strfmon-1.c @@ -57,7 +57,7 @@ foo (char *s, size_t m, double d, long double ld) strfmon (s, m, "%n%n", d); /* { dg-warning "matching" "too few args" } */ strfmon (s, m, ""); /* { dg-warning "zero-length" "empty" } */ strfmon (s, m, NULL); /* { dg-warning "null" "null format string" } */ - strfmon (s, m, "%"); /* { dg-warning "trailing" "tailing %" } */ + strfmon (s, m, "%"); /* { dg-warning "trailing" "trailing %" } */ strfmon (s, m, "%n\0", d); /* { dg-warning "embedded" "embedded NUL" } */ strfmon (s, m, "%^^n", d); /* { dg-warning "repeated" "repeated flag" } */ } diff --git a/gcc/testsuite/gfortran.dg/char4-subscript.f90 b/gcc/testsuite/gfortran.dg/char4-subscript.f90 index fd1cf69..b4e2d11 100644 --- a/gcc/testsuite/gfortran.dg/char4-subscript.f90 +++ b/gcc/testsuite/gfortran.dg/char4-subscript.f90 @@ -22,7 +22,7 @@ if (ichar(var%str2(5:5)) /= int(Z'1F608')) stop 2 deallocate(var%str2) end -! Note: the last '\x00' is regarded as string terminator, hence, the tailing \0 byte is not in the dump +! Note: the last '\x00' is regarded as string terminator, hence, the trailing \0 byte is not in the dump ! { dg-final { scan-tree-dump { \(\*var\.str2\)\[1\]{lb: 1 sz: 4} = "(d\\x00\\x00|\\x00\\x00\\x00d)"\[1\]{lb: 1 sz: 4};} "original" } } ! { dg-final { scan-tree-dump { __builtin_memmove \(\(void \*\) &\(\*var.str2\)\[2\]{lb: 1 sz: 4}, \(void \*\) &"(e\\x00\\x00\\x00f\\x00\\x00|\\x00\\x00\\x00e\\x00\\x00\\x00f)"\[1\]{lb: 1 sz: 4}, 8\);} "original" } } |