FreeChainXenon/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions
gcc/libgfortran/m4
History
Thomas Koenig 97a6203866 re PR fortran/20935 (failed assertion for maxloc(n, mask=.true.)) 
2006-03-20  Thomas Koenig  <Thomas.Koenig@online.de>

	PR fortran/20935
	* iresolve.c (gfc_resolve_maxloc):   If mask is scalar,
	prefix the function name with an "s".  If the mask is scalar
	or if its kind is smaller than gfc_default_logical_kind,
	coerce it to default kind.
	(gfc_resolve_maxval):  Likewise.
	(gfc_resolve_minloc):  Likewise.
	(gfc_resolve_minval):  Likewise.
	(gfc_resolve_product):  Likewise.
	(gfc_resolve_sum):  Likewise.

2006-03-20  Thomas Koenig  <Thomas.Koenig@online.de>

	PR fortran/20935
	* m4/iforeach.m4:  Add SCALAR_FOREACH_FUNCTION macro.
	* m4/ifunction.m4:  Add SCALAR_ARRAY_FUNCTION macro.
	* m4/minloc0.m4:  Use SCALAR_FOREACH_FUNCTION.
	* m4/minloc1.m4:  Use SCALAR_ARRAY_FUNCTION.
	* m4/maxloc0.m4:  Use SCALAR_FOREACH_FUNCTION.
	* m4/maxloc1.m4:  Use SCALAR_ARRAY_FUNCTION.
	* m4/minval.m4:  Likewise.
	* m4/maxval.m4:  Likewise.
	* m4/product.m4:  Likewise.
	* m4/sum.m4:  Likewise.
	* minloc0_16_i16.c : Regenerated.
	* minloc0_16_i4.c : Regenerated.
	* minloc0_16_i8.c : Regenerated.
	* minloc0_16_r10.c : Regenerated.
	* minloc0_16_r16.c : Regenerated.
	* minloc0_16_r4.c : Regenerated.
	* minloc0_16_r8.c : Regenerated.
	* minloc0_4_i16.c : Regenerated.
	* minloc0_4_i4.c : Regenerated.
	* minloc0_4_i8.c : Regenerated.
	* minloc0_4_r10.c : Regenerated.
	* minloc0_4_r16.c : Regenerated.
	* minloc0_4_r4.c : Regenerated.
	* minloc0_4_r8.c : Regenerated.
	* minloc0_8_i16.c : Regenerated.
	* minloc0_8_i4.c : Regenerated.
	* minloc0_8_i8.c : Regenerated.
	* minloc0_8_r10.c : Regenerated.
	* minloc0_8_r16.c : Regenerated.
	* minloc0_8_r4.c : Regenerated.
	* minloc0_8_r8.c : Regenerated.
	* minloc1_16_i16.c : Regenerated.
	* minloc1_16_i4.c : Regenerated.
	* minloc1_16_i8.c : Regenerated.
	* minloc1_16_r10.c : Regenerated.
	* minloc1_16_r16.c : Regenerated.
	* minloc1_16_r4.c : Regenerated.
	* minloc1_16_r8.c : Regenerated.
	* minloc1_4_i16.c : Regenerated.
	* minloc1_4_i4.c : Regenerated.
	* minloc1_4_i8.c : Regenerated.
	* minloc1_4_r10.c : Regenerated.
	* minloc1_4_r16.c : Regenerated.
	* minloc1_4_r4.c : Regenerated.
	* minloc1_4_r8.c : Regenerated.
	* minloc1_8_i16.c : Regenerated.
	* minloc1_8_i4.c : Regenerated.
	* minloc1_8_i8.c : Regenerated.
	* minloc1_8_r10.c : Regenerated.
	* minloc1_8_r16.c : Regenerated.
	* minloc1_8_r4.c : Regenerated.
	* minloc1_8_r8.c : Regenerated.
	* maxloc0_16_i16.c : Regenerated.
	* maxloc0_16_i4.c : Regenerated.
	* maxloc0_16_i8.c : Regenerated.
	* maxloc0_16_r10.c : Regenerated.
	* maxloc0_16_r16.c : Regenerated.
	* maxloc0_16_r4.c : Regenerated.
	* maxloc0_16_r8.c : Regenerated.
	* maxloc0_4_i16.c : Regenerated.
	* maxloc0_4_i4.c : Regenerated.
	* maxloc0_4_i8.c : Regenerated.
	* maxloc0_4_r10.c : Regenerated.
	* maxloc0_4_r16.c : Regenerated.
	* maxloc0_4_r4.c : Regenerated.
	* maxloc0_4_r8.c : Regenerated.
	* maxloc0_8_i16.c : Regenerated.
	* maxloc0_8_i4.c : Regenerated.
	* maxloc0_8_i8.c : Regenerated.
	* maxloc0_8_r10.c : Regenerated.
	* maxloc0_8_r16.c : Regenerated.
	* maxloc0_8_r4.c : Regenerated.
	* maxloc0_8_r8.c : Regenerated.
	* maxloc1_16_i16.c : Regenerated.
	* maxloc1_16_i4.c : Regenerated.
	* maxloc1_16_i8.c : Regenerated.
	* maxloc1_16_r10.c : Regenerated.
	* maxloc1_16_r16.c : Regenerated.
	* maxloc1_16_r4.c : Regenerated.
	* maxloc1_16_r8.c : Regenerated.
	* maxloc1_4_i16.c : Regenerated.
	* maxloc1_4_i4.c : Regenerated.
	* maxloc1_4_i8.c : Regenerated.
	* maxloc1_4_r10.c : Regenerated.
	* maxloc1_4_r16.c : Regenerated.
	* maxloc1_4_r4.c : Regenerated.
	* maxloc1_4_r8.c : Regenerated.
	* maxloc1_8_i16.c : Regenerated.
	* maxloc1_8_i4.c : Regenerated.
	* maxloc1_8_i8.c : Regenerated.
	* maxloc1_8_r10.c : Regenerated.
	* maxloc1_8_r16.c : Regenerated.
	* maxloc1_8_r4.c : Regenerated.
	* maxloc1_8_r8.c : Regenerated.
	* maxval_i16.c : Regenerated.
	* maxval_i4.c : Regenerated.
	* maxval_i8.c : Regenerated.
	* maxval_r10.c : Regenerated.
	* maxval_r16.c : Regenerated.
	* maxval_r4.c : Regenerated.
	* maxval_r8.c : Regenerated.
	* minval_i16.c : Regenerated.
	* minval_i4.c : Regenerated.
	* minval_i8.c : Regenerated.
	* minval_r10.c : Regenerated.
	* minval_r16.c : Regenerated.
	* minval_r4.c : Regenerated.
	* minval_r8.c : Regenerated.
	* sum_c10.c : Regenerated.
	* sum_c16.c : Regenerated.
	* sum_c4.c : Regenerated.
	* sum_c8.c : Regenerated.
	* sum_i16.c : Regenerated.
	* sum_i4.c : Regenerated.
	* sum_i8.c : Regenerated.
	* sum_r10.c : Regenerated.
	* sum_r16.c : Regenerated.
	* sum_r4.c : Regenerated.
	* sum_r8.c : Regenerated.
	* product_c10.c : Regenerated.
	* product_c16.c : Regenerated.
	* product_c4.c : Regenerated.
	* product_c8.c : Regenerated.
	* product_i16.c : Regenerated.
	* product_i4.c : Regenerated.
	* product_i8.c : Regenerated.
	* product_r10.c : Regenerated.
	* product_r16.c : Regenerated.
	* product_r4.c : Regenerated.
	* product_r8.c : Regenerated.

2006-03-20  Thomas Koenig  <Thomas.Koenig@online.de>

	PR fortran/20935
	* gfortran.dg/scalar_mask_2.f90:  New test case.

From-SVN: r112230
2006-03-20 21:56:00 +00:00
..
all.m4 re PR libfortran/19308 (I/O library should support more real and integer kinds) 2005-10-03 07:22:20 +00:00
any.m4 re PR libfortran/19308 (I/O library should support more real and integer kinds) 2005-10-03 07:22:20 +00:00
count.m4 re PR libfortran/19308 (I/O library should support more real and integer kinds) 2005-10-03 07:22:20 +00:00
cshift1.m4 libgfortran ChangeLog: 2005-11-27 23:03:33 +02:00
dotprod.m4 libgfortran ChangeLog: 2005-11-27 23:03:33 +02:00
dotprodc.m4 re PR libfortran/24903 (dotprod should use __builtin_conj) 2006-02-16 07:52:22 +00:00
dotprodl.m4 libgfortran ChangeLog: 2005-11-27 23:03:33 +02:00
eoshift1.m4 libgfortran ChangeLog: 2005-11-27 23:03:33 +02:00
eoshift3.m4 libgfortran ChangeLog: 2005-11-27 23:03:33 +02:00
exponent.m4 re PR libfortran/19308 (I/O library should support more real and integer kinds) 2005-10-03 07:22:20 +00:00
fraction.m4 re PR libfortran/19308 (I/O library should support more real and integer kinds) 2005-10-03 07:22:20 +00:00
head.m4 All files: Update FSF address. 2005-08-17 02:49:08 +00:00
iforeach.m4 re PR fortran/20935 (failed assertion for maxloc(n, mask=.true.)) 2006-03-20 21:56:00 +00:00
ifunction.m4 re PR fortran/20935 (failed assertion for maxloc(n, mask=.true.)) 2006-03-20 21:56:00 +00:00
in_pack.m4 re PR libfortran/19308 (I/O library should support more real and integer kinds) 2005-10-03 07:22:20 +00:00
in_unpack.m4 re PR libfortran/19308 (I/O library should support more real and integer kinds) 2005-10-03 07:22:20 +00:00
iparm.m4 re PR libfortran/21127 (reshape of complex broken) 2005-05-18 20:24:32 +00:00
matmul.m4 Make-lang.in (fortran/trans-resolve.o): Depend on fortran/dependency.h. 2005-12-13 05:23:12 +00:00
matmull.m4 re PR libfortran/21468 (vectorizing libfortran) 2005-11-14 21:48:31 +02:00
maxloc0.m4 re PR fortran/20935 (failed assertion for maxloc(n, mask=.true.)) 2006-03-20 21:56:00 +00:00
maxloc1.m4 re PR fortran/20935 (failed assertion for maxloc(n, mask=.true.)) 2006-03-20 21:56:00 +00:00
maxval.m4 re PR fortran/20935 (failed assertion for maxloc(n, mask=.true.)) 2006-03-20 21:56:00 +00:00
minloc0.m4 re PR fortran/20935 (failed assertion for maxloc(n, mask=.true.)) 2006-03-20 21:56:00 +00:00
minloc1.m4 re PR fortran/20935 (failed assertion for maxloc(n, mask=.true.)) 2006-03-20 21:56:00 +00:00
minval.m4 re PR fortran/20935 (failed assertion for maxloc(n, mask=.true.)) 2006-03-20 21:56:00 +00:00
mtype.m4 re PR libfortran/19308 (I/O library should support more real and integer kinds) 2005-10-03 07:22:20 +00:00
nearest.m4 re PR libfortran/19308 (I/O library should support more real and integer kinds) 2005-10-03 07:22:20 +00:00
pow.m4 re PR libfortran/19308 (I/O library should support more real and integer kinds) 2005-10-03 07:22:20 +00:00
product.m4 re PR fortran/20935 (failed assertion for maxloc(n, mask=.true.)) 2006-03-20 21:56:00 +00:00
reshape.m4 libgfortran ChangeLog: 2005-11-27 23:03:33 +02:00
set_exponent.m4 re PR libfortran/19308 (I/O library should support more real and integer kinds) 2005-10-03 07:22:20 +00:00
shape.m4 libgfortran ChangeLog: 2005-11-27 23:03:33 +02:00
specific.m4 re PR libfortran/19308 (I/O library should support more real and integer kinds) 2005-10-03 07:22:20 +00:00
specific2.m4 re PR libfortran/19308 (I/O library should support more real and integer kinds) 2005-10-03 07:22:20 +00:00
sum.m4 re PR fortran/20935 (failed assertion for maxloc(n, mask=.true.)) 2006-03-20 21:56:00 +00:00
transpose.m4 libgfortran ChangeLog: 2005-11-27 23:03:33 +02:00
types.m4