https://gcc.gnu.org/g:faa866b263183ca675739477765f2350529fc4bc
commit faa866b263183ca675739477765f2350529fc4bc
Author: Mikael Morin <mik...@gcc.gnu.org>
Date: Tue Jul 1 22:21:29 2025 +0200
Revert "Ajout commentaires"
This reverts commit 8c93f758f952df0f3f29d02da3427aa989d4e082.
Diff:
---
gcc/fortran/trans-descriptor.cc | 13 -------------
1 file changed, 13 deletions(-)
diff --git a/gcc/fortran/trans-descriptor.cc b/gcc/fortran/trans-descriptor.cc
index d247c73fc725..2dc40fbdf3ee 100644
--- a/gcc/fortran/trans-descriptor.cc
+++ b/gcc/fortran/trans-descriptor.cc
@@ -28,10 +28,6 @@ along with GCC; see the file COPYING3. If not see
#include "trans-types.h"
-/******************************************************************************/
-/* BIND(C) array descriptor (AKA CFI array descriptor) access routines
*/
-/******************************************************************************/
-
/* Build expressions to access members of the CFI descriptor. */
#define CFI_FIELD_BASE_ADDR 0
#define CFI_FIELD_ELEM_LEN 1
@@ -138,11 +134,6 @@ gfc_get_cfi_dim_sm (tree desc, tree idx)
#undef CFI_DIM_FIELD_EXTENT
#undef CFI_DIM_FIELD_SM
-
-/******************************************************************************/
-/* Array descriptor low level access routines.
*/
-/******************************************************************************/
-
/* Build expressions to access the members of an array descriptor.
It's surprisingly easy to mess up here, so never access
an array descriptor by "brute force", always use these
@@ -609,10 +600,6 @@ gfc_conv_descriptor_ubound_set (stmtblock_t *block, tree
desc,
}
-/*******************************************************************************
- * Array descriptor higher level routines.
*
-
******************************************************************************/
-
/* Build a null array descriptor constructor. */
tree
