[Fortran,5/7] Fortran: Delete unused decl in trans-stmt.h

Message ID 20211024223023.1410274-6-rep.dot.nop@gmail.com
State Committed
Commit 51227c5991046ad826c575715b02257e1879e482
Headers
Series delete some unused decls, make static |

Commit Message

Bernhard Reutner-Fischer Oct. 24, 2021, 10:30 p.m. UTC
  From: Bernhard Reutner-Fischer <aldot@gcc.gnu.org>

gcc/fortran/ChangeLog:

	* trans-stmt.h (gfc_trans_deallocate_array): Delete.
---
 gcc/fortran/trans-stmt.h | 1 -
 1 file changed, 1 deletion(-)
  

Comments

Tobias Burnus Oct. 26, 2021, 9:40 a.m. UTC | #1
On 25.10.21 00:30, Bernhard Reutner-Fischer via Gcc-patches wrote:
> From: Bernhard Reutner-Fischer <aldot@gcc.gnu.org>
>
> gcc/fortran/ChangeLog:
>
>       * trans-stmt.h (gfc_trans_deallocate_array): Delete.

OK. Thanks!

Tobias

> ---
>   gcc/fortran/trans-stmt.h | 1 -
>   1 file changed, 1 deletion(-)
>
> diff --git a/gcc/fortran/trans-stmt.h b/gcc/fortran/trans-stmt.h
> index 1a24d9b4cdc..e824caf4d08 100644
> --- a/gcc/fortran/trans-stmt.h
> +++ b/gcc/fortran/trans-stmt.h
> @@ -66,7 +66,6 @@ tree gfc_trans_sync_team (gfc_code *);
>   tree gfc_trans_where (gfc_code *);
>   tree gfc_trans_allocate (gfc_code *);
>   tree gfc_trans_deallocate (gfc_code *);
> -tree gfc_trans_deallocate_array (tree);
>
>   /* trans-openmp.c */
>   tree gfc_trans_omp_directive (gfc_code *);
-----------------
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
  

Patch

diff --git a/gcc/fortran/trans-stmt.h b/gcc/fortran/trans-stmt.h
index 1a24d9b4cdc..e824caf4d08 100644
--- a/gcc/fortran/trans-stmt.h
+++ b/gcc/fortran/trans-stmt.h
@@ -66,7 +66,6 @@  tree gfc_trans_sync_team (gfc_code *);
 tree gfc_trans_where (gfc_code *);
 tree gfc_trans_allocate (gfc_code *);
 tree gfc_trans_deallocate (gfc_code *);
-tree gfc_trans_deallocate_array (tree);
 
 /* trans-openmp.c */
 tree gfc_trans_omp_directive (gfc_code *);