Commit 1b38192d by Francois-Xavier Coudert Committed by François-Xavier Coudert

simplify.c (gfc_simplify_bessel_j0,gfc_simplify_bessel_j1, [...]): Mark…

simplify.c (gfc_simplify_bessel_j0,gfc_simplify_bessel_j1, [...]): Mark arguments with ATTRIBUTE_UNUSED.

	* simplify.c (gfc_simplify_bessel_j0,gfc_simplify_bessel_j1,
	gfc_simplify_bessel_jn,gfc_simplify_bessel_y0,
	gfc_simplify_bessel_y1,gfc_simplify_bessel_yn): Mark arguments
	with ATTRIBUTE_UNUSED.

From-SVN: r134998
parent 37a2dc42
2008-05-06 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
* simplify.c (gfc_simplify_bessel_j0,gfc_simplify_bessel_j1,
gfc_simplify_bessel_jn,gfc_simplify_bessel_y0,
gfc_simplify_bessel_y1,gfc_simplify_bessel_yn): Mark arguments
with ATTRIBUTE_UNUSED.
2008-05-06 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
* check.c (gfc_check_sizeof): Switch to ATTRIBUTE_UNUSED.
* simplify.c (gfc_simplify_lgamma): Likewise.
......
......@@ -637,7 +637,7 @@ gfc_simplify_atan2 (gfc_expr *y, gfc_expr *x)
gfc_expr *
gfc_simplify_bessel_j0 (gfc_expr *x)
gfc_simplify_bessel_j0 (gfc_expr *x ATTRIBUTE_UNUSED)
{
#if MPFR_VERSION >= MPFR_VERSION_NUM(2,3,0)
gfc_expr *result;
......@@ -657,7 +657,7 @@ gfc_simplify_bessel_j0 (gfc_expr *x)
gfc_expr *
gfc_simplify_bessel_j1 (gfc_expr *x)
gfc_simplify_bessel_j1 (gfc_expr *x ATTRIBUTE_UNUSED)
{
#if MPFR_VERSION >= MPFR_VERSION_NUM(2,3,0)
gfc_expr *result;
......@@ -677,7 +677,8 @@ gfc_simplify_bessel_j1 (gfc_expr *x)
gfc_expr *
gfc_simplify_bessel_jn (gfc_expr *order, gfc_expr *x)
gfc_simplify_bessel_jn (gfc_expr *order ATTRIBUTE_UNUSED,
gfc_expr *x ATTRIBUTE_UNUSED)
{
#if MPFR_VERSION >= MPFR_VERSION_NUM(2,3,0)
gfc_expr *result;
......@@ -699,7 +700,7 @@ gfc_simplify_bessel_jn (gfc_expr *order, gfc_expr *x)
gfc_expr *
gfc_simplify_bessel_y0 (gfc_expr *x)
gfc_simplify_bessel_y0 (gfc_expr *x ATTRIBUTE_UNUSED)
{
#if MPFR_VERSION >= MPFR_VERSION_NUM(2,3,0)
gfc_expr *result;
......@@ -719,7 +720,7 @@ gfc_simplify_bessel_y0 (gfc_expr *x)
gfc_expr *
gfc_simplify_bessel_y1 (gfc_expr *x)
gfc_simplify_bessel_y1 (gfc_expr *x ATTRIBUTE_UNUSED)
{
#if MPFR_VERSION >= MPFR_VERSION_NUM(2,3,0)
gfc_expr *result;
......@@ -739,7 +740,8 @@ gfc_simplify_bessel_y1 (gfc_expr *x)
gfc_expr *
gfc_simplify_bessel_yn (gfc_expr *order, gfc_expr *x)
gfc_simplify_bessel_yn (gfc_expr *order ATTRIBUTE_UNUSED,
gfc_expr *x ATTRIBUTE_UNUSED)
{
#if MPFR_VERSION >= MPFR_VERSION_NUM(2,3,0)
gfc_expr *result;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment