From: Tobias Burnus <tobias@codesourcery.com>
To: gcc-patches <gcc-patches@gcc.gnu.org>, fortran <fortran@gcc.gnu.org>
Subject: [committed] Fortran: Fix (mostly) comment typos
Date: Fri, 28 Apr 2023 09:26:06 +0200 [thread overview]
Message-ID: <0823ec47-8720-6fae-e359-c11145a21e08@codesourcery.com> (raw)
[-- Attachment #1: Type: text/plain, Size: 344 bytes --]
Committed as r14-319-g7ebd4a1d61993c0a75e9ff3098aded21ef04a4da
Tobias
-----------------
Siemens Electronic Design Automation GmbH; Anschrift: Arnulfstraße 201, 80634 München; Gesellschaft mit beschränkter Haftung; Geschäftsführer: Thomas Heurung, Frank Thürauf; Sitz der Gesellschaft: München; Registergericht München, HRB 106955
[-- Attachment #2: committed.diff --]
[-- Type: text/x-patch, Size: 14947 bytes --]
commit 7ebd4a1d61993c0a75e9ff3098aded21ef04a4da
Author: Tobias Burnus <tobias@codesourcery.com>
Date: Fri Apr 28 09:23:18 2023 +0200
Fortran: Fix (mostly) comment typos
Only other changes are fixing the variable name a(b)breviated_modproc_decl
and a few typos in gfortran.texi.
gcc/fortran/ChangeLog:
* gfortran.texi: Fix typos.
* decl.cc: Fix typos in comments and in a variable name.
* arith.cc: Fix comment typos.
* check.cc: Likewise.
* class.cc: Likewise.
* dependency.cc: Likewise.
* expr.cc: Likewise.
* frontend-passes.cc: Likewise.
* gfortran.h: Likewise.
* intrinsic.cc: Likewise.
* iresolve.cc: Likewise.
* match.cc: Likewise.
* module.cc: Likewise.
* primary.cc: Likewise.
* resolve.cc: Likewise.
* simplify.cc: Likewise.
* trans-array.cc: Likewise.
* trans-decl.cc: Likewise.
* trans-expr.cc: Likewise.
* trans-intrinsic.cc: Likewise.
* trans-openmp.cc: Likewise.
* trans-stmt.cc: Likewise.
diff --git a/gcc/fortran/arith.cc b/gcc/fortran/arith.cc
index ddf9874671c..d1d814b3ae1 100644
--- a/gcc/fortran/arith.cc
+++ b/gcc/fortran/arith.cc
@@ -1037 +1037 @@ gfc_arith_concat (gfc_expr *op1, gfc_expr *op2, gfc_expr **resultp)
- to get mismaching types here. */
+ to get mismatching types here. */
diff --git a/gcc/fortran/check.cc b/gcc/fortran/check.cc
index 8c1ae8c2f00..b348bda6e6c 100644
--- a/gcc/fortran/check.cc
+++ b/gcc/fortran/check.cc
@@ -96 +96 @@ illegal_boz_arg (gfc_expr *x)
-/* Some precedures take two arguments such that both cannot be BOZ. */
+/* Some procedures take two arguments such that both cannot be BOZ. */
diff --git a/gcc/fortran/class.cc b/gcc/fortran/class.cc
index bffc0ffff3a..9d0c802b867 100644
--- a/gcc/fortran/class.cc
+++ b/gcc/fortran/class.cc
@@ -1634 +1634 @@ finalizer_insert_packed_call (gfc_code *block, gfc_finalizer *fini,
- derived type "derived". The function first calls the approriate FINAL
+ derived type "derived". The function first calls the appropriate FINAL
diff --git a/gcc/fortran/decl.cc b/gcc/fortran/decl.cc
index 233bf244d62..9c4b40d4ac4 100644
--- a/gcc/fortran/decl.cc
+++ b/gcc/fortran/decl.cc
@@ -1084 +1084 @@ char_len_param_value (gfc_expr **expr, bool *deferred)
- /* If gfortran gets an EXPR_OP, try to simplifiy it. This catches things
+ /* If gfortran gets an EXPR_OP, try to simplify it. This catches things
@@ -1579 +1579 @@ gfc_verify_c_interop_param (gfc_symbol *sym)
- length of 1. However, as an argument they are also iteroperable
+ length of 1. However, as an argument they are also interoperable
@@ -2850 +2850 @@ variable_decl (int elem)
- /* The dummy arguments and result of the abreviated form of MODULE
+ /* The dummy arguments and result of the abbreviated form of MODULE
@@ -3120 +3120 @@ variable_decl (int elem)
- /* Before adding a possible initilizer, do a simple check for compatibility
+ /* Before adding a possible initializer, do a simple check for compatibility
@@ -8351 +8351 @@ gfc_match_end (gfc_statement *st)
- bool abreviated_modproc_decl = false;
+ bool abbreviated_modproc_decl = false;
@@ -8375 +8375 @@ gfc_match_end (gfc_statement *st)
- abreviated_modproc_decl = gfc_state_stack->previous->sym
+ abbreviated_modproc_decl = gfc_state_stack->previous->sym
@@ -8383,2 +8383,2 @@ gfc_match_end (gfc_statement *st)
- if (!abreviated_modproc_decl)
- abreviated_modproc_decl = gfc_current_block ()
+ if (!abbreviated_modproc_decl)
+ abbreviated_modproc_decl = gfc_current_block ()
@@ -8398 +8398 @@ gfc_match_end (gfc_statement *st)
- if (!abreviated_modproc_decl)
+ if (!abbreviated_modproc_decl)
@@ -8407 +8407 @@ gfc_match_end (gfc_statement *st)
- if (!abreviated_modproc_decl)
+ if (!abbreviated_modproc_decl)
@@ -8536 +8536 @@ gfc_match_end (gfc_statement *st)
- abreviated_modproc_decl ? "END PROCEDURE"
+ abbreviated_modproc_decl ? "END PROCEDURE"
@@ -8554 +8554 @@ gfc_match_end (gfc_statement *st)
- gfc_error ("Expecting %s statement at %L", abreviated_modproc_decl
+ gfc_error ("Expecting %s statement at %L", abbreviated_modproc_decl
diff --git a/gcc/fortran/dependency.cc b/gcc/fortran/dependency.cc
index 9117825ee6e..a648d5c7903 100644
--- a/gcc/fortran/dependency.cc
+++ b/gcc/fortran/dependency.cc
@@ -546 +546 @@ gfc_dep_difference (gfc_expr *e1, gfc_expr *e2, mpz_t *result)
- /* Inizialize tentatively, clear if we don't return anything. */
+ /* Initialize tentatively, clear if we don't return anything. */
diff --git a/gcc/fortran/expr.cc b/gcc/fortran/expr.cc
index 02028f993fd..b19e3647aa0 100644
--- a/gcc/fortran/expr.cc
+++ b/gcc/fortran/expr.cc
@@ -3659 +3659 @@ gfc_check_conformance (gfc_expr *op1, gfc_expr *op2, const char *optype_msgid, .
- coarray call, then the convert is done by the coarray routine implictly and
+ coarray call, then the convert is done by the coarray routine implicitly and
diff --git a/gcc/fortran/frontend-passes.cc b/gcc/fortran/frontend-passes.cc
index 90428982023..136a292807d 100644
--- a/gcc/fortran/frontend-passes.cc
+++ b/gcc/fortran/frontend-passes.cc
@@ -427 +427 @@ copy_walk_reduction_arg (gfc_constructor *c, gfc_expr *fn)
-/* Callback function for optimzation of reductions to scalars. Transform ANY
+/* Callback function for optimization of reductions to scalars. Transform ANY
@@ -429 +429 @@ copy_walk_reduction_arg (gfc_constructor *c, gfc_expr *fn)
- correspondingly. Handly only the simple cases without MASK and DIM. */
+ correspondingly. Handle only the simple cases without MASK and DIM. */
@@ -1458 +1458 @@ simplify_io_impl_do (gfc_code **code, int *walk_subtrees,
- flag_frontend_optimize and flag_fronend_loop_interchange are
+ flag_frontend_optimize and flag_frontend_loop_interchange are
diff --git a/gcc/fortran/gfortran.h b/gcc/fortran/gfortran.h
index db77d24e8b5..a15ff90e228 100644
--- a/gcc/fortran/gfortran.h
+++ b/gcc/fortran/gfortran.h
@@ -1919 +1919 @@ typedef struct gfc_symbol
- abreviated declaration in a submodule. */
+ abbreviated declaration in a submodule. */
@@ -2194 +2194 @@ typedef struct gfc_namespace
- /* Set to 1 if the namespace uses "IMPLICT NONE (export)". */
+ /* Set to 1 if the namespace uses "IMPLICIT NONE (export)". */
diff --git a/gcc/fortran/gfortran.texi b/gcc/fortran/gfortran.texi
index b96712987e1..7786d23265f 100644
--- a/gcc/fortran/gfortran.texi
+++ b/gcc/fortran/gfortran.texi
@@ -1410 +1410 @@ descriptors in @code{FORMAT} statements. A comma with no following format
-decriptor is permited if the @option{-fdec-blank-format-item} is given on
+descriptor is permitted if the @option{-fdec-blank-format-item} is given on
@@ -3896 +3896 @@ caf_deregister_t;
-Allows to specifiy the type of deregistration of a coarray object. The
+Allows to specify the type of deregistration of a coarray object. The
@@ -4861 +4861 @@ The statement is an image-control statement but does not imply sync memory.
-Still, all preceeding push communications of this image to the specified
+Still, all preceding push communications of this image to the specified
@@ -4906 +4906 @@ The statement is an image-control statement but does not imply sync memory.
-Still, all preceeding push communications of this image to the specified
+Still, all preceding push communications of this image to the specified
diff --git a/gcc/fortran/intrinsic.cc b/gcc/fortran/intrinsic.cc
index 1a26b7a571f..b5ef664eb33 100644
--- a/gcc/fortran/intrinsic.cc
+++ b/gcc/fortran/intrinsic.cc
@@ -3313 +3313 @@ add_functions (void)
- /* The next of intrinsic subprogram are the degree trignometric functions.
+ /* The next of intrinsic subprogram are the degree trigonometric functions.
diff --git a/gcc/fortran/iresolve.cc b/gcc/fortran/iresolve.cc
index 8acad60a02b..7880aba63bb 100644
--- a/gcc/fortran/iresolve.cc
+++ b/gcc/fortran/iresolve.cc
@@ -3107 +3107 @@ gfc_resolve_trim (gfc_expr *f, gfc_expr *string)
-/* Resolve the degree trignometric functions. This amounts to setting
+/* Resolve the degree trigonometric functions. This amounts to setting
diff --git a/gcc/fortran/match.cc b/gcc/fortran/match.cc
index 5eb6d0e1c1d..d59daf5a581 100644
--- a/gcc/fortran/match.cc
+++ b/gcc/fortran/match.cc
@@ -5739 +5739 @@ gfc_match_equivalence (void)
- MATCH_NO for a variable of the form equivalencej. */
+ MATCH_NO for a variable of the form equivalence. */
diff --git a/gcc/fortran/module.cc b/gcc/fortran/module.cc
index 601497e0998..95fdda6b2aa 100644
--- a/gcc/fortran/module.cc
+++ b/gcc/fortran/module.cc
@@ -2422 +2422 @@ mio_symbol_attribute (symbol_attribute *attr)
- /* ... intentionally omitted here; it's only unsed internally. */
+ /* ... intentionally omitted here; it's only used internally. */
diff --git a/gcc/fortran/primary.cc b/gcc/fortran/primary.cc
index 00d35a71770..077489ab96e 100644
--- a/gcc/fortran/primary.cc
+++ b/gcc/fortran/primary.cc
@@ -759,2 +759,2 @@ done:
- trailing digits, which may cause the appearance of higher pecision
- than the kind kan support.
+ trailing digits, which may cause the appearance of higher precision
+ than the kind can support.
@@ -3063 +3063 @@ build_actual_constructor (gfc_structure_ctor_component **comp_head,
- /* ....(Preceeding sentence) If a component with default
+ /* ....(Preceding sentence) If a component with default
diff --git a/gcc/fortran/resolve.cc b/gcc/fortran/resolve.cc
index 55d8e326a87..c3d508fb45d 100644
--- a/gcc/fortran/resolve.cc
+++ b/gcc/fortran/resolve.cc
@@ -5886 +5886 @@ resolve_variable (gfc_expr *e)
- or when that is not present, which may happend for polymorphic
+ or when that is not present, which may happened for polymorphic
@@ -6105 +6105 @@ resolve_procedure:
- explcitly to be external. Here, the old symbol is changed
+ explicitly to be external. Here, the old symbol is changed
@@ -11137 +11137 @@ resolve_ordinary_assign (gfc_code *code, gfc_namespace *ns)
- to non-character variables. This not permited for nonconstant
+ to non-character variables. This not permitted for nonconstant
diff --git a/gcc/fortran/simplify.cc b/gcc/fortran/simplify.cc
index b65854c1021..7b0642126a9 100644
--- a/gcc/fortran/simplify.cc
+++ b/gcc/fortran/simplify.cc
@@ -4133 +4133 @@ simplify_bound_dim (gfc_expr *array, gfc_expr *kind, int d, int upper,
- the result isn't dependent on the array emptyness. */
+ the result isn't dependent on the array emptiness. */
@@ -4137 +4137 @@ simplify_bound_dim (gfc_expr *array, gfc_expr *kind, int d, int upper,
- /* Array emptyness can't be determined, we can't simplify. */
+ /* Array emptiness can't be determined, we can't simplify. */
diff --git a/gcc/fortran/trans-array.cc b/gcc/fortran/trans-array.cc
index e1725808033..785cf504816 100644
--- a/gcc/fortran/trans-array.cc
+++ b/gcc/fortran/trans-array.cc
@@ -8591 +8591 @@ gfc_conv_array_parameter (gfc_se * se, gfc_expr * expr, bool g77,
- /* When optmizing, we can use gfc_conv_subref_array_arg for
+ /* When optimizing, we can use gfc_conv_subref_array_arg for
@@ -11196 +11196 @@ gfc_alloc_allocatable_for_assignment (gfc_loopinfo *loop,
-/* Initialize class descriptor's TKR infomation. */
+/* Initialize class descriptor's TKR information. */
diff --git a/gcc/fortran/trans-decl.cc b/gcc/fortran/trans-decl.cc
index 299764b08b2..18e2b8b78b4 100644
--- a/gcc/fortran/trans-decl.cc
+++ b/gcc/fortran/trans-decl.cc
@@ -7624 +7624 @@ gfc_generate_function_code (gfc_namespace * ns)
- /* Character(len=*) explict-size/assumed-size array. */
+ /* Character(len=*) explicit-size/assumed-size array. */
diff --git a/gcc/fortran/trans-expr.cc b/gcc/fortran/trans-expr.cc
index 09cdd9263c4..d902e8f3281 100644
--- a/gcc/fortran/trans-expr.cc
+++ b/gcc/fortran/trans-expr.cc
@@ -5599 +5599 @@ gfc_conv_gfc_desc_to_cfi_desc (gfc_se *parmse, gfc_expr *e, gfc_symbol *fsym)
- /* Create array decriptor and set version, rank, attribute, type. */
+ /* Create array descriptor and set version, rank, attribute, type. */
@@ -5753 +5753 @@ gfc_conv_gfc_desc_to_cfi_desc (gfc_se *parmse, gfc_expr *e, gfc_symbol *fsym)
- an CFI descriptor. Use the type in the descritor as it provide
+ an CFI descriptor. Use the type in the descriptor as it provide
@@ -8156 +8156 @@ gfc_trans_string_copy (stmtblock_t * block, tree dlength, tree dest,
- postive number and triggers the warning in BUILTIN_MEMSET. Fixing
+ positive number and triggers the warning in BUILTIN_MEMSET. Fixing
diff --git a/gcc/fortran/trans-intrinsic.cc b/gcc/fortran/trans-intrinsic.cc
index 3cce9c0166e..e0c171d5f25 100644
--- a/gcc/fortran/trans-intrinsic.cc
+++ b/gcc/fortran/trans-intrinsic.cc
@@ -4129 +4129 @@ gfc_conv_intrinsic_minmax (gfc_se * se, gfc_expr * expr, enum tree_code op)
- There are valid usecase for returning either one, but the
+ There are valid use case for returning either one, but the
diff --git a/gcc/fortran/trans-openmp.cc b/gcc/fortran/trans-openmp.cc
index 4ff9c59df5c..71f71235756 100644
--- a/gcc/fortran/trans-openmp.cc
+++ b/gcc/fortran/trans-openmp.cc
@@ -86 +86 @@ gfc_omp_is_optional_argument (const_tree decl)
- themselve are returned as tree - or a NULL_TREE otherwise. Those decls are
+ themselves are returned as tree - or a NULL_TREE otherwise. Those decls are
@@ -6071 +6071 @@ gfc_add_clause_implicitly (gfc_omp_clauses *clauses_out,
- /* For parallel do, GCC puts firstprivatee/lastprivate
+ /* For parallel do, GCC puts firstprivate/lastprivate
@@ -6638 +6638 @@ gfc_split_omp_clauses (gfc_code *code,
- and taskloop. The code below itereates over variables in the
+ and taskloop. The code below iterates over variables in the
diff --git a/gcc/fortran/trans-stmt.cc b/gcc/fortran/trans-stmt.cc
index 776f98d08d9..589f200162a 100644
--- a/gcc/fortran/trans-stmt.cc
+++ b/gcc/fortran/trans-stmt.cc
@@ -473 +473 @@ gfc_trans_call (gfc_code * code, bool dependency_check,
- as temporaries are handled separatedly
+ as temporaries are handled separately
@@ -2296 +2296 @@ trans_associate_var (gfc_symbol *sym, gfc_wrapped_block *block)
- /* Deferred strings are dealt with in the preceeding. */
+ /* Deferred strings are dealt with in the preceding. */
@@ -4106 +4106 @@ gfc_trans_forall_loop (forall_info *forall_tmp, tree body,
- the autoparallelizer can hande this. */
+ the autoparallelizer can handle this. */
@@ -6354 +6354 @@ gfc_trans_allocate (gfc_code * code)
- simplfy computation of array properties. */
+ simplify computation of array properties. */
@@ -6629 +6629 @@ gfc_trans_allocate (gfc_code * code)
- namespace to prevent accidently modifying a colliding
+ namespace to prevent accidentaly modifying a colliding
next reply other threads:[~2023-04-28 7:26 UTC|newest]
Thread overview: 2+ messages / expand[flat|nested] mbox.gz Atom feed top
2023-04-28 7:26 Tobias Burnus [this message]
2023-04-28 18:36 ` Bernhard Reutner-Fischer
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=0823ec47-8720-6fae-e359-c11145a21e08@codesourcery.com \
--to=tobias@codesourcery.com \
--cc=fortran@gcc.gnu.org \
--cc=gcc-patches@gcc.gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).