diff options
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/fortran/ChangeLog | 7 | ||||
| -rw-r--r-- | gcc/fortran/simplify.c | 14 |
2 files changed, 15 insertions, 6 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index b67a5b8..083a1de 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,5 +1,12 @@ 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. diff --git a/gcc/fortran/simplify.c b/gcc/fortran/simplify.c index d7fafec..5de686f 100644 --- a/gcc/fortran/simplify.c +++ b/gcc/fortran/simplify.c @@ -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; |