gcc/libgfortran/m4
Francois-Xavier Coudert 691da334bc re PR fortran/36319 (Segfault with wide characters in DATA)
PR fortran/36319

	* intrinsic.c (gfc_convert_chartype): Don't mark conversion
	function as pure.
	* trans-array.c (gfc_trans_array_ctor_element): Divide element
	size by the size of one character to obtain length.
	* iresolve.c (gfc_resolve_cshift): Call the _char4 variant when
	appropriate.
	(gfc_resolve_eoshift): Likewise.
	* trans-intrinsic.c (gfc_conv_intrinsic_ctime): Minor beautification.
	(gfc_conv_intrinsic_fdate): Minor beautification.
	(gfc_conv_intrinsic_ttynam): Minor beautification.
	(gfc_conv_intrinsic_minmax_char): Allow all character kinds.
	(size_of_string_in_bytes): New function.
	(gfc_conv_intrinsic_size): Call size_of_string_in_bytes for
	character expressions.
	(gfc_conv_intrinsic_sizeof): Likewise.
	(gfc_conv_intrinsic_array_transfer): Likewise.
	(gfc_conv_intrinsic_trim): Allow all character kinds. Minor
	beautification.
	(gfc_conv_intrinsic_repeat): Fix comment typo.
	* simplify.c (gfc_convert_char_constant): Take care of conversion
	of array constructors.

	* intrinsics/string_intrinsics_inc.c (string_index): Return
	correct value for zero-length substring.
	* intrinsics/cshift0.c: Add _char4 variant.
	* intrinsics/eoshift0.c (eoshift0): Allow filler to be a pattern
	wider than a single byte. Add _char4 variant and use above
	functionality.
	* intrinsics/eoshift2.c (eoshift2): Likewise.
	* m4/eoshift1.m4: Likewise.
	* m4/eoshift3.m4: Likewise.
	* m4/cshift1.m4: Add _char4 variants.
	* gfortran.map (GFORTRAN_1.1): Add _gfortran_cshift0_1_char4,
	_gfortran_cshift0_2_char4, _gfortran_cshift0_4_char4,
	_gfortran_cshift0_8_char4, _gfortran_cshift1_16_char4,
	_gfortran_cshift1_4_char4, _gfortran_cshift1_8_char4,
	_gfortran_eoshift0_1_char4, _gfortran_eoshift0_2_char4,
	_gfortran_eoshift0_4_char4, _gfortran_eoshift0_8_char4,
	_gfortran_eoshift1_16_char4, _gfortran_eoshift1_4_char4,
	_gfortran_eoshift1_8_char4, _gfortran_eoshift2_1_char4,
	_gfortran_eoshift2_2_char4, _gfortran_eoshift2_4_char4,
	_gfortran_eoshift2_8_char4, _gfortran_eoshift3_16_char4,
	_gfortran_eoshift3_4_char4 and _gfortran_eoshift3_8_char4.
	* generated/eoshift3_4.c: Regenerate.
	* generated/eoshift1_8.c: Regenerate.
	* generated/eoshift1_16.c: Regenerate.
	* generated/cshift1_4.c: Regenerate.
	* generated/eoshift1_4.c: Regenerate.
	* generated/eoshift3_8.c: Regenerate.
	* generated/eoshift3_16.c: Regenerate.
	* generated/cshift1_8.c: Regenerate.
	* generated/cshift1_16.c: Regenerate.

	* gfortran.dg/widechar_5.f90: New file.
	* gfortran.dg/widechar_6.f90: New file.
	* gfortran.dg/widechar_7.f90: New file.
	* gfortran.dg/widechar_intrinsics_5.f90: Uncomment the lines
	testing the SPREAD intrinsic.
	* gfortran.dg/widechar_intrinsics_6.f90: New file.
	* gfortran.dg/widechar_intrinsics_7.f90: New file.
	* gfortran.dg/widechar_intrinsics_8.f90: New file.
	* gfortran.dg/widechar_intrinsics_9.f90: New file.
	* gfortran.dg/widechar_intrinsics_10.f90: New file.

From-SVN: r136129
2008-05-28 21:11:39 +00:00
..
all.m4 re PR libfortran/34671 (any(kind=1) and all(kind=1)) 2008-01-15 21:22:07 +00:00
any.m4 re PR libfortran/34671 (any(kind=1) and all(kind=1)) 2008-01-15 21:22:07 +00:00
count.m4 re PR libfortran/34671 (any(kind=1) and all(kind=1)) 2008-01-15 21:22:07 +00:00
cshift1.m4 re PR fortran/36319 (Segfault with wide characters in DATA) 2008-05-28 21:11:39 +00:00
eoshift1.m4 re PR fortran/36319 (Segfault with wide characters in DATA) 2008-05-28 21:11:39 +00:00
eoshift3.m4 re PR fortran/36319 (Segfault with wide characters in DATA) 2008-05-28 21:11:39 +00:00
exponent.m4 minloc1.m4: Update copyright year and ajust headers order. 2007-08-31 14:01:34 +00:00
fraction.m4 minloc1.m4: Update copyright year and ajust headers order. 2007-08-31 14:01:34 +00:00
head.m4 minloc1.m4: Update copyright year and ajust headers order. 2007-08-31 14:01:34 +00:00
iforeach.m4 in_pack.m4 (internal_pack_'rtype_code`): Destination pointer is restrict. 2008-05-18 20:39:04 +00:00
ifunction_logical.m4 re PR fortran/35995 (ANY, ALL, and COUNT errors for zero sized sections) 2008-05-04 19:07:28 +00:00
ifunction.m4 re PR fortran/35995 (ANY, ALL, and COUNT errors for zero sized sections) 2008-05-04 19:07:28 +00:00
in_pack.m4 in_pack.m4 (internal_pack_'rtype_code`): Destination pointer is restrict. 2008-05-18 20:39:04 +00:00
in_unpack.m4 in_pack.m4 (internal_pack_'rtype_code`): Destination pointer is restrict. 2008-05-18 20:39:04 +00:00
iparm.m4 re PR libfortran/34670 (bounds checking for array intrinsics) 2008-01-11 20:21:05 +00:00
matmul.m4 re PR fortran/35988 (run-time abort for MATMUL of run-time zero sized array) 2008-04-23 05:50:54 +00:00
matmull.m4 re PR fortran/34566 (Matmul of logical values) 2007-12-25 10:12:41 +00:00
maxloc0.m4 minloc1.m4: Update copyright year and ajust headers order. 2007-08-31 14:01:34 +00:00
maxloc1.m4 minloc1.m4: Update copyright year and ajust headers order. 2007-08-31 14:01:34 +00:00
maxval.m4 minloc1.m4: Update copyright year and ajust headers order. 2007-08-31 14:01:34 +00:00
minloc0.m4 minloc1.m4: Update copyright year and ajust headers order. 2007-08-31 14:01:34 +00:00
minloc1.m4 minloc1.m4: Update copyright year and ajust headers order. 2007-08-31 14:01:34 +00:00
minval.m4 minloc1.m4: Update copyright year and ajust headers order. 2007-08-31 14:01:34 +00:00
misc_specifics.m4 gfortran.h (gfc_options_t): Add flag_allow_leading_underscore. 2007-01-20 18:33:20 +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 minloc1.m4: Update copyright year and ajust headers order. 2007-08-31 14:01:34 +00:00
pack.m4 in_pack.m4 (internal_pack_'rtype_code`): Destination pointer is restrict. 2008-05-18 20:39:04 +00:00
pow.m4 minloc1.m4: Update copyright year and ajust headers order. 2007-08-31 14:01:34 +00:00
product.m4 minloc1.m4: Update copyright year and ajust headers order. 2007-08-31 14:01:34 +00:00
reshape.m4 re PR fortran/35960 (run time abort with assignment of RESHAPEd zero sized array) 2008-04-25 20:11:19 +00:00
rrspacing.m4 minloc1.m4: Update copyright year and ajust headers order. 2007-08-31 14:01:34 +00:00
set_exponent.m4 minloc1.m4: Update copyright year and ajust headers order. 2007-08-31 14:01:34 +00:00
shape.m4 re PR libfortran/35001 (shape for negative sizes) 2008-02-02 13:50:55 +00:00
spacing.m4 minloc1.m4: Update copyright year and ajust headers order. 2007-08-31 14:01:34 +00:00
specific2.m4 gfortran.h (gfc_options_t): Add flag_allow_leading_underscore. 2007-01-20 18:33:20 +00:00
specific.m4 gfortran.h (gfc_options_t): Add flag_allow_leading_underscore. 2007-01-20 18:33:20 +00:00
spread.m4 in_pack.m4 (internal_pack_'rtype_code`): Destination pointer is restrict. 2008-05-18 20:39:04 +00:00
sum.m4 minloc1.m4: Update copyright year and ajust headers order. 2007-08-31 14:01:34 +00:00
transpose.m4 in_pack.m4 (internal_pack_'rtype_code`): Destination pointer is restrict. 2008-05-18 20:39:04 +00:00
types.m4
unpack.m4 in_pack.m4 (internal_pack_'rtype_code`): Destination pointer is restrict. 2008-05-18 20:39:04 +00:00