public inbox for gcc-patches@gcc.gnu.org
 help / color / mirror / Atom feed
* [patch] fortran/*: Fix comment typos.
@ 2007-07-28 23:59 Kazu Hirata
  0 siblings, 0 replies; 6+ messages in thread
From: Kazu Hirata @ 2007-07-28 23:59 UTC (permalink / raw)
  To: gcc-patches; +Cc: fortran

Hi,

Committed as obvious.

Kazu Hirata

2007-07-28  Kazu Hirata  <kazu@codesourcery.com>

	* gfortran.h, interface.c, resolve.c, symbol.c: Fix comment
	typos.
	* intrinsic.texi, invoke.texi: Fix typos.

Index: fortran/gfortran.h
===================================================================
--- fortran/gfortran.h	(revision 127025)
+++ fortran/gfortran.h	(working copy)
@@ -157,7 +157,7 @@ typedef enum
 { FORM_FREE, FORM_FIXED, FORM_UNKNOWN }
 gfc_source_form;
 
-/* Basic types.  BT_VOID is used by ISO C BInding so funcs like c_f_pointer
+/* Basic types.  BT_VOID is used by ISO C Binding so funcs like c_f_pointer
    can take any arg with the pointer attribute as a param.  */
 typedef enum
 { BT_UNKNOWN = 1, BT_INTEGER, BT_REAL, BT_COMPLEX,
Index: fortran/interface.c
===================================================================
--- fortran/interface.c	(revision 127025)
+++ fortran/interface.c	(working copy)
@@ -1400,7 +1400,7 @@ get_sym_storage_size (gfc_symbol *sym)
 
 /* Returns the storage size of an expression (actual argument) or
    zero if it cannot be determined. For an array element, it returns
-   the remaing size as the element sequence consists of all storage
+   the remaining size as the element sequence consists of all storage
    units of the actual argument up to the end of the array.  */
 
 static unsigned long
Index: fortran/intrinsic.texi
===================================================================
--- fortran/intrinsic.texi	(revision 127025)
+++ fortran/intrinsic.texi	(working copy)
@@ -2082,7 +2082,7 @@ Inquiry function
 
 @item @emph{Arguments}:
 @multitable @columnfractions .15 .70
-@item @var{x} @tab Associated scalar pointer or interoperatable scalar
+@item @var{x} @tab Associated scalar pointer or interoperable scalar
 		   or allocated allocatable variable with @code{TARGET}
 		   attribute.
 @end multitable
Index: fortran/invoke.texi
===================================================================
--- fortran/invoke.texi	(revision 127025)
+++ fortran/invoke.texi	(working copy)
@@ -450,7 +450,7 @@ check that the declared interfaces are c
 
 @item -Wnonstd-intrinsics
 @opindex @code{Wnonstd-intrinsics}
-@cindex warnings, non-stdandard intrinsics
+@cindex warnings, non-standard intrinsics
 Warn if the user tries to use an intrinsic that does not belong to the 
 standard the user has chosen via the @option{-std} option.
 
Index: fortran/resolve.c
===================================================================
--- fortran/resolve.c	(revision 127025)
+++ fortran/resolve.c	(working copy)
@@ -2386,7 +2386,7 @@ gfc_iso_c_sub_interface (gfc_code *c, gf
     }
   else if (sym->intmod_sym_id == ISOCBINDING_ASSOCIATED)
     {
-      /* TODO: Figure out if this is even reacable; this part of the
+      /* TODO: Figure out if this is even reachable; this part of the
          conditional may not be necessary.  */
       int num_args = 0;
       if (c->ext.actual->next == NULL)
Index: fortran/symbol.c
===================================================================
--- fortran/symbol.c	(revision 127025)
+++ fortran/symbol.c	(working copy)
@@ -3454,7 +3454,7 @@ gen_shape_param (gfc_formal_arglist **he
      of BT_INTEGER type.  */
   param_sym->ts.type = BT_VOID;
 
-  /* Initialize the kind to default integer.  However, it will be overriden
+  /* Initialize the kind to default integer.  However, it will be overridden
      during resolution to match the kind of the SHAPE parameter given as
      the actual argument (to allow for any valid integer kind).  */
   param_sym->ts.kind = gfc_default_integer_kind;   

^ permalink raw reply	[flat|nested] 6+ messages in thread

* [patch] fortran/*: Fix comment typos.
@ 2007-07-07 13:45 Kazu Hirata
  0 siblings, 0 replies; 6+ messages in thread
From: Kazu Hirata @ 2007-07-07 13:45 UTC (permalink / raw)
  To: gcc-patches; +Cc: fortran

Hi,

Committed as obvious.

Kazu Hirata

2007-07-07  Kazu Hirata  <kazu@codesourcery.com>

	* decl.c, gfortran.h, interface.c, module.c, resolve.c,
	trans-array.c, trans-decl.c: Fix comment typos.  Follow
	spelling conventions.
	* intrinsic.texi: Fix typos.  Follow spelling conventions.

Index: fortran/decl.c
===================================================================
--- fortran/decl.c	(revision 126438)
+++ fortran/decl.c	(working copy)
@@ -4017,7 +4017,7 @@ gfc_match_subroutine (void)
 
 /* Match a BIND(C) specifier, with the optional 'name=' specifier if
    given, and set the binding label in either the given symbol (if not
-   NULL), or in the current_ts.  The symbol may be NULL becuase we may
+   NULL), or in the current_ts.  The symbol may be NULL because we may
    encounter the BIND(C) before the declaration itself.  Return
    MATCH_NO if what we're looking at isn't a BIND(C) specifier,
    MATCH_ERROR if it is a BIND(C) clause but an error was encountered,
@@ -4915,7 +4915,7 @@ syntax:
 }
 
 
-/* The PRIVATE statement is a bit weird in that it can be a attribute
+/* The PRIVATE statement is a bit weird in that it can be an attribute
    declaration, but also works as a standlone statement inside of a
    type declaration or a module.  */
 
Index: fortran/gfortran.h
===================================================================
--- fortran/gfortran.h	(revision 126438)
+++ fortran/gfortran.h	(working copy)
@@ -297,7 +297,7 @@ typedef enum ifsrc
 }
 ifsrc;
 
-/* Whether a SAVE attribute was set explicitly or implictly.  */
+/* Whether a SAVE attribute was set explicitly or implicitly.  */
 typedef enum save_state
 { SAVE_NONE = 0, SAVE_EXPLICIT, SAVE_IMPLICIT
 }
Index: fortran/interface.c
===================================================================
--- fortran/interface.c	(revision 126438)
+++ fortran/interface.c	(working copy)
@@ -1972,7 +1972,7 @@ check_some_aliasing (gfc_formal_arglist 
 
 
 /* Given a symbol of a formal argument list and an expression,
-   return non-zero if their intents are compatible, zero otherwise.  */
+   return nonzero if their intents are compatible, zero otherwise.  */
 
 static int
 compare_parameter_intent (gfc_symbol *formal, gfc_expr *actual)
Index: fortran/intrinsic.texi
===================================================================
--- fortran/intrinsic.texi	(revision 126438)
+++ fortran/intrinsic.texi	(working copy)
@@ -1845,8 +1845,8 @@ end program test_btest
 @node C_ASSOCIATED
 @section @code{C_ASSOCIATED} --- Status of a C pointer
 @fnindex C_ASSOCIATED
-@cindex associatation status, C pointer
-@cindex pointer, C associatation status
+@cindex association status, C pointer
+@cindex pointer, C association status
 
 @table @asis
 @item @emph{Description}:
@@ -2235,7 +2235,7 @@ Subroutine, non-elemental function
                         specify a valid path within the file system.
 @item @var{STATUS} @tab (Optional) @code{INTEGER} status flag of the default
                         kind.  Returns 0 on success, and a system specific
-                        and non-zero error code otherwise.
+                        and nonzero error code otherwise.
 @end multitable
 
 @item @emph{Example}:
@@ -2293,11 +2293,11 @@ used as the file name.
 @code{/bin/chmod}.
 
 @item @var{STATUS} @tab (optional) scalar @code{INTEGER}, which is
-@code{0} on success and non-zero otherwise.
+@code{0} on success and nonzero otherwise.
 @end multitable
 
 @item @emph{Return value}:
-In either syntax, @var{STATUS} is set to @code{0} on success and non-zero
+In either syntax, @var{STATUS} is set to @code{0} on success and nonzero
 otherwise.
 
 @item @emph{Example}:
@@ -4305,7 +4305,7 @@ Moves @var{UNIT} to the specified @var{O
 is set to 0, the @var{OFFSET} is taken as an absolute value @code{SEEK_SET},
 if set to 1, @var{OFFSET} is taken to be relative to the current position 
 @code{SEEK_CUR}, and if set to 2 relative to the end of the file @code{SEEK_END}.
-On error, @var{STATUS} is set to a non-zero value. If @var{STATUS} the seek 
+On error, @var{STATUS} is set to a nonzero value. If @var{STATUS} the seek 
 fails silently.
 
 This intrinsic routine is not fully backwards compatible with @command{g77}. 
@@ -4684,7 +4684,7 @@ Non-elemental subroutine.
 @multitable @columnfractions .15 .70
 @item @var{CWD}    @tab The type shall be @code{CHARACTER(*)}.
 @item @var{STATUS} @tab (Optional) status flag. Returns 0 on success, 
-                        a system specific and non-zero error code otherwise.
+                        a system specific and nonzero error code otherwise.
 @end multitable
 
 @item @emph{Example}:
@@ -7902,7 +7902,7 @@ If @var{VECTOR} is present, the result s
 number of @code{TRUE} values in @var{MASK} otherwise.
 
 @item @emph{Example}:
-Gathering non-zero elements from an array:
+Gathering nonzero elements from an array:
 @smallexample
 PROGRAM test_pack_1
   INTEGER :: m(6)
@@ -7911,7 +7911,7 @@ PROGRAM test_pack_1
 END PROGRAM
 @end smallexample
 
-Gathering non-zero elements from an array and appending elements from @var{VECTOR}:
+Gathering nonzero elements from an array and appending elements from @var{VECTOR}:
 @smallexample
 PROGRAM test_pack_2
   INTEGER :: m(4)
@@ -10444,7 +10444,7 @@ F95 and later
 Elemental function
 
 @item @emph{Syntax}:
-@code{RESULT = VERFIY(STRING, SET[, BACK])}
+@code{RESULT = VERIFY(STRING, SET[, BACK])}
 
 @item @emph{Arguments}:
 @multitable @columnfractions .15 .70
Index: fortran/module.c
===================================================================
--- fortran/module.c	(revision 126438)
+++ fortran/module.c	(working copy)
@@ -4234,7 +4234,7 @@ sort_iso_c_rename_list (void)
 }
 
 
-/* Import the instrinsic ISO_C_BINDING module, generating symbols in
+/* Import the intrinsic ISO_C_BINDING module, generating symbols in
    the current namespace for all named constants, pointer types, and
    procedures in the module unless the only clause was used or a rename
    list was provided.  */
Index: fortran/resolve.c
===================================================================
--- fortran/resolve.c	(revision 126438)
+++ fortran/resolve.c	(working copy)
@@ -3849,7 +3849,7 @@ gfc_resolve_expr (gfc_expr *e)
 	}
 
       /* This provides the opportunity for the length of constructors with
-	 character valued function elements to propogate the string length
+	 character valued function elements to propagate the string length
 	 to the expression.  */
       if (e->ts.type == BT_CHARACTER)
 	gfc_resolve_character_array_constructor (e);
Index: fortran/trans-array.c
===================================================================
--- fortran/trans-array.c	(revision 126438)
+++ fortran/trans-array.c	(working copy)
@@ -1594,7 +1594,7 @@ constant_array_constructor_loop_size (gf
 	return NULL_TREE;
       if (!integer_zerop (loop->from[i]))
 	{
-	  /* Only allow non-zero "from" in one-dimensional arrays.  */
+	  /* Only allow nonzero "from" in one-dimensional arrays.  */
 	  if (loop->dimen != 1)
 	    return NULL_TREE;
 	  tmp = fold_build2 (MINUS_EXPR, gfc_array_index_type,
Index: fortran/trans-decl.c
===================================================================
--- fortran/trans-decl.c	(revision 126438)
+++ fortran/trans-decl.c	(working copy)
@@ -1280,7 +1280,7 @@ build_function_decl (gfc_symbol * sym)
   if (attr.pure || attr.elemental)
     {
       /* TODO: check if a pure SUBROUTINE has no INTENT(OUT) arguments
-	 including a alternate return. In that case it can also be
+	 including an alternate return. In that case it can also be
 	 marked as PURE. See also in gfc_get_extern_function_decl().  */
       if (attr.function && !gfc_return_by_reference (sym))
 	DECL_IS_PURE (fndecl) = 1;

^ permalink raw reply	[flat|nested] 6+ messages in thread

* Re: [patch] fortran/*: Fix comment typos.
  2007-04-15 14:37 Kazu Hirata
@ 2007-04-15 18:56 ` Brooks Moses
  0 siblings, 0 replies; 6+ messages in thread
From: Brooks Moses @ 2007-04-15 18:56 UTC (permalink / raw)
  To: gcc-patches; +Cc: fortran

Due to a typo in the email address, this didn't go to the fortran@ list, 
although Kazu meant to send it there.  Thus, I'm forwarding it along.

Thanks for fixing these, Kazu!

- Brooks


Kazu Hirata wrote:
> Hi,
> 
> Committed as obvious.
> 
> Kazu Hirata
> 
> 2007-04-15  Kazu Hirata  <kazu@codesourcery.com>
> 
> 	* fortran/gfc-internals.texi: Fix typos.
> 	* fortran/simplify.c: Fix a comment typo.
> 
> Index: fortran/gfc-internals.texi
> ===================================================================
> --- fortran/gfc-internals.texi	(revision 123842)
> +++ fortran/gfc-internals.texi	(working copy)
> @@ -298,7 +298,7 @@ nested chain of @code{gfc_code} structur
>  identified by the @code{op} member of the structure, the different
>  possible values are enumerated in @code{gfc_exec_op}.  A special
>  member of this @code{enum} is @code{EXEC_NOP} which is used to
> -reperesent the various @code{END} statements if they carry a label.
> +represent the various @code{END} statements if they carry a label.
>  Depending on the type of statement some of the other fields will be
>  filled in.  Fields that are generally applicable are the @code{next}
>  and @code{here} fields.  The former points to the next statement in
> @@ -314,7 +314,7 @@ block in question.  The @code{SELECT} an
>  contain various blocks (the chain of @code{ELSE IF} and @code{ELSE}
>  blocks or the various @code{CASE}s, respectively).
>  
> -@c What would be nice here would be an example program togehter with
> +@c What would be nice here would be an example program together with
>  @c an image that says more than the mythical thousand words.
>  
>  
> Index: fortran/simplify.c
> ===================================================================
> --- fortran/simplify.c	(revision 123842)
> +++ fortran/simplify.c	(working copy)
> @@ -2842,7 +2842,7 @@ gfc_simplify_repeat (gfc_expr *e, gfc_ex
>      }
>    mpz_clear (ncopies);
>  
> -  /* For further simplication, we need the character string to be
> +  /* For further simplification, we need the character string to be
>       constant.  */
>    if (e->expr_type != EXPR_CONSTANT)
>      return NULL;
> 

^ permalink raw reply	[flat|nested] 6+ messages in thread

* [patch] fortran/*: Fix comment typos.
@ 2007-04-15 14:37 Kazu Hirata
  2007-04-15 18:56 ` Brooks Moses
  0 siblings, 1 reply; 6+ messages in thread
From: Kazu Hirata @ 2007-04-15 14:37 UTC (permalink / raw)
  To: fortran; +Cc: gcc-patches

Hi,

Committed as obvious.

Kazu Hirata

2007-04-15  Kazu Hirata  <kazu@codesourcery.com>

	* fortran/gfc-internals.texi: Fix typos.
	* fortran/simplify.c: Fix a comment typo.

Index: fortran/gfc-internals.texi
===================================================================
--- fortran/gfc-internals.texi	(revision 123842)
+++ fortran/gfc-internals.texi	(working copy)
@@ -298,7 +298,7 @@ nested chain of @code{gfc_code} structur
 identified by the @code{op} member of the structure, the different
 possible values are enumerated in @code{gfc_exec_op}.  A special
 member of this @code{enum} is @code{EXEC_NOP} which is used to
-reperesent the various @code{END} statements if they carry a label.
+represent the various @code{END} statements if they carry a label.
 Depending on the type of statement some of the other fields will be
 filled in.  Fields that are generally applicable are the @code{next}
 and @code{here} fields.  The former points to the next statement in
@@ -314,7 +314,7 @@ block in question.  The @code{SELECT} an
 contain various blocks (the chain of @code{ELSE IF} and @code{ELSE}
 blocks or the various @code{CASE}s, respectively).
 
-@c What would be nice here would be an example program togehter with
+@c What would be nice here would be an example program together with
 @c an image that says more than the mythical thousand words.
 
 
Index: fortran/simplify.c
===================================================================
--- fortran/simplify.c	(revision 123842)
+++ fortran/simplify.c	(working copy)
@@ -2842,7 +2842,7 @@ gfc_simplify_repeat (gfc_expr *e, gfc_ex
     }
   mpz_clear (ncopies);
 
-  /* For further simplication, we need the character string to be
+  /* For further simplification, we need the character string to be
      constant.  */
   if (e->expr_type != EXPR_CONSTANT)
     return NULL;

^ permalink raw reply	[flat|nested] 6+ messages in thread

* [patch] fortran/*: Fix comment typos.
@ 2006-10-14  1:56 Kazu Hirata
  0 siblings, 0 replies; 6+ messages in thread
From: Kazu Hirata @ 2006-10-14  1:56 UTC (permalink / raw)
  To: gcc-patches; +Cc: fortran

Hi,

Committed as obvious.

Kazu Hirata

2006-10-14  Kazu Hirata  <kazu@codesourcery.com>

	* intrinsic.texi: Fix typos.
	* trans-array.c: Fix a comment typo.

Index: intrinsic.texi
===================================================================
--- intrinsic.texi	(revision 117721)
+++ intrinsic.texi	(working copy)
@@ -3895,7 +3895,7 @@ END PROGRAM
 @end smallexample
 
 @item @emph{See also}:
-GNU Fortran 77 compability function: @ref{IARGC}
+GNU Fortran 77 compatibility function: @ref{IARGC}
 
 F2003 functions and subroutines: @ref{GET_COMMAND}, @ref{GET_COMMAND_ARGUMENT}, @ref{COMMAND_ARGUMENT_COUNT}
 @end table
@@ -4466,7 +4466,7 @@ The number of command line arguments, ty
 See @ref{GETARG}
 
 @item @emph{See also}:
-GNU Fortran 77 compability subroutine: @ref{GETARG}
+GNU Fortran 77 compatibility subroutine: @ref{GETARG}
 
 F2003 functions and subroutines: @ref{GET_COMMAND}, @ref{GET_COMMAND_ARGUMENT}, @ref{COMMAND_ARGUMENT_COUNT}
 @end table
Index: trans-array.c
===================================================================
--- trans-array.c	(revision 117721)
+++ trans-array.c	(working copy)
@@ -4968,7 +4968,7 @@ gfc_trans_deferred_array (gfc_symbol * s
   gfc_set_backend_locus (&sym->declared_at);
   descriptor = sym->backend_decl;
 
-  /* Although static, derived types with deafult initializers and
+  /* Although static, derived types with default initializers and
      allocatable components must not be nulled wholesale; instead they
      are treated component by component.  */
   if (TREE_STATIC (descriptor) && !sym_has_alloc_comp)

^ permalink raw reply	[flat|nested] 6+ messages in thread

* [patch] fortran/*: Fix comment typos.
@ 2006-04-08 14:31 Kazu Hirata
  0 siblings, 0 replies; 6+ messages in thread
From: Kazu Hirata @ 2006-04-08 14:31 UTC (permalink / raw)
  To: gcc-patches; +Cc: fortran

Hi,

Committed as obvious.

Kazu Hirata

2006-04-08  Kazu Hirata  <kazu@codesourcery.com>

	* gfortran.texi: Fix typos.  Follow spelling conventions.
	* resolve.c, trans-expr.c, trans-stmt.c: Fix comment typos.
	Follow spelling conventions.

Index: fortran/gfortran.texi
===================================================================
--- fortran/gfortran.texi	(revision 112778)
+++ fortran/gfortran.texi	(working copy)
@@ -548,7 +548,7 @@ Environment variable forcing standard ou
 @chapter Runtime:  Influencing runtime behavior with environment variables
 @cindex Runtime
 
-The behaviour of the @command{gfortran} can be influenced by
+The behavior of the @command{gfortran} can be influenced by
 environment variables.
 
 Malformed environment variables are silently ignored.
@@ -610,7 +610,7 @@ this is also missing, the default is @fi
 This environment variable controls wether all output is unbuffered.
 If the first letter is @samp{y}, @samp{Y} or @samp{1}, all output is
 unbuffered. This will slow down large writes.  If the first letter is
-@samp{n}, @samp{N}  or @samp{0}, output is bufferred.  This is the
+@samp{n}, @samp{N}  or @samp{0}, output is buffered.  This is the
 default.
 
 @node GFORTRAN_SHOW_LOCUS
@@ -626,7 +626,7 @@ for runtime errors. The default is to pr
 
 If the first letter is @samp{y}, @samp{Y} or @samp{1},
 a plus sign is printed
-where permitted by the Fortran standard.  If the first lettter
+where permitted by the Fortran standard.  If the first letter
 is @samp{n}, @samp{N} or @samp{0}, a plus sign is not printed
 in most cases. Default is not to print plus signs.
 
Index: fortran/resolve.c
===================================================================
--- fortran/resolve.c	(revision 112778)
+++ fortran/resolve.c	(working copy)
@@ -701,7 +701,7 @@ procedure_kind (gfc_symbol * sym)
 }
 
 /* Check references to assumed size arrays.  The flag need_full_assumed_size
-   is non-zero when matching actual arguments.  */
+   is nonzero when matching actual arguments.  */
 
 static int need_full_assumed_size = 0;
 
@@ -1342,7 +1342,7 @@ resolve_function (gfc_expr * expr)
 	     && expr->value.function.isym->generic_id != GFC_ISYM_PRESENT)
     {
       /* Array instrinsics must also have the last upper bound of an
-	 asumed size array argument.  UBOUND and SIZE have to be
+	 assumed size array argument.  UBOUND and SIZE have to be
 	 excluded from the check if the second argument is anything
 	 than a constant.  */
       int inquiry;
@@ -4843,7 +4843,7 @@ resolve_fl_procedure (gfc_symbol *sym, i
 
   /* Ensure that derived type for are not of a private type.  Internal
      module procedures are excluded by 2.2.3.3 - ie. they are not
-     externally accessible and can access all the objects accesible in
+     externally accessible and can access all the objects accessible in
      the host. */
   if (!(sym->ns->parent
 	    && sym->ns->parent->proc_name->attr.flavor == FL_MODULE)
Index: fortran/trans-expr.c
===================================================================
--- fortran/trans-expr.c	(revision 112778)
+++ fortran/trans-expr.c	(working copy)
@@ -1712,7 +1712,7 @@ gfc_conv_aliased_arg (gfc_se * parmse, g
      temporary array has lbounds of zero and strides of one in all
      dimensions, so this is very simple.  The offset is only computed
      outside the innermost loop, so the overall transfer could be
-     optimised further.  */
+     optimized further.  */
   info = &rse.ss->data.info;
 
   tmp_index = gfc_index_zero_node;
Index: fortran/trans-stmt.c
===================================================================
--- fortran/trans-stmt.c	(revision 112778)
+++ fortran/trans-stmt.c	(working copy)
@@ -2650,7 +2650,7 @@ gfc_evaluate_where_mask (gfc_expr * me, 
       gfc_conv_expr (&rse, me);
     }
 
-  /* Variable to evalate mask condition.  */
+  /* Variable to evaluate mask condition.  */
   cond = gfc_create_var (mask_type, "cond");
   if (mask && (cmask || pmask))
     mtmp = gfc_create_var (mask_type, "mask");

^ permalink raw reply	[flat|nested] 6+ messages in thread

end of thread, other threads:[~2007-07-28 23:50 UTC | newest]

Thread overview: 6+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2007-07-28 23:59 [patch] fortran/*: Fix comment typos Kazu Hirata
  -- strict thread matches above, loose matches on Subject: below --
2007-07-07 13:45 Kazu Hirata
2007-04-15 14:37 Kazu Hirata
2007-04-15 18:56 ` Brooks Moses
2006-10-14  1:56 Kazu Hirata
2006-04-08 14:31 Kazu Hirata

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).