libgfortran.h (GFC_ARRAY_DESCRIPTOR): Replace 'type *base' by 'size_t offset'.

[platform/upstream/gcc.git] / libgfortran / generated / minval_r8.c

diff --git a/libgfortran/generated/minval_r8.c b/libgfortran/generated/minval_r8.c
index 050b3c9..7f66c2a 100644 (file)
--- a/libgfortran/generated/minval_r8.c
+++ b/libgfortran/generated/minval_r8.c
@@ -93,7 +93,7 @@ minval_r8 (gfc_array_r8 *retarray, gfc_array_r8 *array, index_type *pdim)
         = internal_malloc_size (sizeof (GFC_REAL_8)
                                 * retarray->dim[rank-1].stride
                                 * extent[rank-1]);
-      retarray->base = 0;
+      retarray->offset = 0;
       retarray->dtype = (array->dtype & ~GFC_DTYPE_RANK_MASK) | rank;
     }
   else
@@ -239,7 +239,7 @@ mminval_r8 (gfc_array_r8 * retarray, gfc_array_r8 * array,
         = internal_malloc_size (sizeof (GFC_REAL_8)
                                 * retarray->dim[rank-1].stride
                                 * extent[rank-1]);
-      retarray->base = 0;
+      retarray->offset = 0;
       retarray->dtype = (array->dtype & ~GFC_DTYPE_RANK_MASK) | rank;
     }
   else