From 95928a1322cc2f3382ae1aaeac946228ca513d72 Mon Sep 17 00:00:00 2001 From: Thomas Koenig Date: Sat, 10 Sep 2011 14:06:57 +0000 Subject: re PR fortran/49479 (reshape / optionals / zero sized arrays) 2011-09-10 Thomas Koenig PR fortran/49479 * generated/m4/ifunction.m4: Always call internal_malloc_size even when there is a zero-sized return array. * generated/generated/maxloc1_16_i16.c: Regenerated. * generated/generated/maxloc1_16_i1.c: Regenerated. * generated/generated/maxloc1_16_i2.c: Regenerated. * generated/generated/maxloc1_16_i4.c: Regenerated. * generated/generated/maxloc1_16_i8.c: Regenerated. * generated/generated/maxloc1_16_r10.c: Regenerated. * generated/generated/maxloc1_16_r16.c: Regenerated. * generated/generated/maxloc1_16_r4.c: Regenerated. * generated/generated/maxloc1_16_r8.c: Regenerated. * generated/generated/maxloc1_4_i16.c: Regenerated. * generated/generated/maxloc1_4_i1.c: Regenerated. * generated/generated/maxloc1_4_i2.c: Regenerated. * generated/generated/maxloc1_4_i4.c: Regenerated. * generated/generated/maxloc1_4_i8.c: Regenerated. * generated/generated/maxloc1_4_r10.c: Regenerated. * generated/generated/maxloc1_4_r16.c: Regenerated. * generated/generated/maxloc1_4_r4.c: Regenerated. * generated/generated/maxloc1_4_r8.c: Regenerated. * generated/generated/maxloc1_8_i16.c: Regenerated. * generated/generated/maxloc1_8_i1.c: Regenerated. * generated/generated/maxloc1_8_i2.c: Regenerated. * generated/generated/maxloc1_8_i4.c: Regenerated. * generated/generated/maxloc1_8_i8.c: Regenerated. * generated/generated/maxloc1_8_r10.c: Regenerated. * generated/generated/maxloc1_8_r16.c: Regenerated. * generated/generated/maxloc1_8_r4.c: Regenerated. * generated/generated/maxloc1_8_r8.c: Regenerated. * generated/generated/maxval_i16.c: Regenerated. * generated/generated/maxval_i1.c: Regenerated. * generated/generated/maxval_i2.c: Regenerated. * generated/generated/maxval_i4.c: Regenerated. * generated/generated/maxval_i8.c: Regenerated. * generated/generated/maxval_r10.c: Regenerated. * generated/generated/maxval_r16.c: Regenerated. * generated/generated/maxval_r4.c: Regenerated. * generated/generated/maxval_r8.c: Regenerated. * generated/generated/minloc1_16_i16.c: Regenerated. * generated/generated/minloc1_16_i1.c: Regenerated. * generated/generated/minloc1_16_i2.c: Regenerated. * generated/generated/minloc1_16_i4.c: Regenerated. * generated/generated/minloc1_16_i8.c: Regenerated. * generated/generated/minloc1_16_r10.c: Regenerated. * generated/generated/minloc1_16_r16.c: Regenerated. * generated/generated/minloc1_16_r4.c: Regenerated. * generated/generated/minloc1_16_r8.c: Regenerated. * generated/generated/minloc1_4_i16.c: Regenerated. * generated/generated/minloc1_4_i1.c: Regenerated. * generated/generated/minloc1_4_i2.c: Regenerated. * generated/generated/minloc1_4_i4.c: Regenerated. * generated/generated/minloc1_4_i8.c: Regenerated. * generated/generated/minloc1_4_r10.c: Regenerated. * generated/generated/minloc1_4_r16.c: Regenerated. * generated/generated/minloc1_4_r4.c: Regenerated. * generated/generated/minloc1_4_r8.c: Regenerated. * generated/generated/minloc1_8_i16.c: Regenerated. * generated/generated/minloc1_8_i1.c: Regenerated. * generated/generated/minloc1_8_i2.c: Regenerated. * generated/generated/minloc1_8_i4.c: Regenerated. * generated/generated/minloc1_8_i8.c: Regenerated. * generated/generated/minloc1_8_r10.c: Regenerated. * generated/generated/minloc1_8_r16.c: Regenerated. * generated/generated/minloc1_8_r4.c: Regenerated. * generated/generated/minloc1_8_r8.c: Regenerated. * generated/generated/minval_i16.c: Regenerated. * generated/generated/minval_i1.c: Regenerated. * generated/generated/minval_i2.c: Regenerated. * generated/generated/minval_i4.c: Regenerated. * generated/generated/minval_i8.c: Regenerated. * generated/generated/minval_r10.c: Regenerated. * generated/generated/minval_r16.c: Regenerated. * generated/generated/minval_r4.c: Regenerated. * generated/generated/minval_r8.c: Regenerated. * generated/generated/product_c10.c: Regenerated. * generated/generated/product_c16.c: Regenerated. * generated/generated/product_c4.c: Regenerated. * generated/generated/product_c8.c: Regenerated. * generated/generated/product_i16.c: Regenerated. * generated/generated/product_i1.c: Regenerated. * generated/generated/product_i2.c: Regenerated. * generated/generated/product_i4.c: Regenerated. * generated/generated/product_i8.c: Regenerated. * generated/generated/product_r10.c: Regenerated. * generated/generated/product_r16.c: Regenerated. * generated/generated/product_r4.c: Regenerated. * generated/generated/product_r8.c: Regenerated. * generated/generated/sum_c10.c: Regenerated. * generated/generated/sum_c16.c: Regenerated. * generated/generated/sum_c4.c: Regenerated. * generated/generated/sum_c8.c: Regenerated. * generated/generated/sum_i16.c: Regenerated. * generated/generated/sum_i1.c: Regenerated. * generated/generated/sum_i2.c: Regenerated. * generated/generated/sum_i4.c: Regenerated. * generated/generated/sum_i8.c: Regenerated. * generated/generated/sum_r10.c: Regenerated. * generated/generated/sum_r16.c: Regenerated. * generated/generated/sum_r4.c: Regenerated. * generated/generated/sum_r8.c: Regenerated. From-SVN: r178748 --- libgfortran/generated/minval_i4.c | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'libgfortran/generated/minval_i4.c') diff --git a/libgfortran/generated/minval_i4.c b/libgfortran/generated/minval_i4.c index 3023bc214a1..993116a8345 100644 --- a/libgfortran/generated/minval_i4.c +++ b/libgfortran/generated/minval_i4.c @@ -100,6 +100,7 @@ minval_i4 (gfc_array_i4 * const restrict retarray, alloc_size = sizeof (GFC_INTEGER_4) * GFC_DESCRIPTOR_STRIDE(retarray,rank-1) * extent[rank-1]; + retarray->data = internal_malloc_size (alloc_size); if (alloc_size == 0) { /* Make sure we have a zero-sized array. */ @@ -107,8 +108,6 @@ minval_i4 (gfc_array_i4 * const restrict retarray, return; } - else - retarray->data = internal_malloc_size (alloc_size); } else { -- cgit v1.2.1