2008-04-30 18:56:01 +02:00
|
|
|
2008-04-30 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/35993
|
|
|
|
|
* ifunction.m4 (SCALAR_ARRAY_FUNCTION): Use correct
|
|
|
|
|
implementation for multi-dimensional return arrays when
|
|
|
|
|
the mask is .false.
|
|
|
|
|
* generated/maxloc1_16_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r8.c: Regenerated.
|
|
|
|
|
* generated/maxval_i1.c: Regenerated.
|
|
|
|
|
* generated/maxval_i16.c: Regenerated.
|
|
|
|
|
* generated/maxval_i2.c: Regenerated.
|
|
|
|
|
* generated/maxval_i4.c: Regenerated.
|
|
|
|
|
* generated/maxval_i8.c: Regenerated.
|
|
|
|
|
* generated/maxval_r10.c: Regenerated.
|
|
|
|
|
* generated/maxval_r16.c: Regenerated.
|
|
|
|
|
* generated/maxval_r4.c: Regenerated.
|
|
|
|
|
* generated/maxval_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r8.c: Regenerated.
|
|
|
|
|
* generated/minval_i1.c: Regenerated.
|
|
|
|
|
* generated/minval_i16.c: Regenerated.
|
|
|
|
|
* generated/minval_i2.c: Regenerated.
|
|
|
|
|
* generated/minval_i4.c: Regenerated.
|
|
|
|
|
* generated/minval_i8.c: Regenerated.
|
|
|
|
|
* generated/minval_r10.c: Regenerated.
|
|
|
|
|
* generated/minval_r16.c: Regenerated.
|
|
|
|
|
* generated/minval_r4.c: Regenerated.
|
|
|
|
|
* generated/minval_r8.c: Regenerated.
|
|
|
|
|
* generated/product_c10.c: Regenerated.
|
|
|
|
|
* generated/product_c16.c: Regenerated.
|
|
|
|
|
* generated/product_c4.c: Regenerated.
|
|
|
|
|
* generated/product_c8.c: Regenerated.
|
|
|
|
|
* generated/product_i1.c: Regenerated.
|
|
|
|
|
* generated/product_i16.c: Regenerated.
|
|
|
|
|
* generated/product_i2.c: Regenerated.
|
|
|
|
|
* generated/product_i4.c: Regenerated.
|
|
|
|
|
* generated/product_i8.c: Regenerated.
|
|
|
|
|
* generated/product_r10.c: Regenerated.
|
|
|
|
|
* generated/product_r16.c: Regenerated.
|
|
|
|
|
* generated/product_r4.c: Regenerated.
|
|
|
|
|
* generated/product_r8.c: Regenerated.
|
|
|
|
|
* generated/sum_c10.c: Regenerated.
|
|
|
|
|
* generated/sum_c16.c: Regenerated.
|
|
|
|
|
* generated/sum_c4.c: Regenerated.
|
|
|
|
|
* generated/sum_c8.c: Regenerated.
|
|
|
|
|
* generated/sum_i1.c: Regenerated.
|
|
|
|
|
* generated/sum_i16.c: Regenerated.
|
|
|
|
|
* generated/sum_i2.c: Regenerated.
|
|
|
|
|
* generated/sum_i4.c: Regenerated.
|
|
|
|
|
* generated/sum_i8.c: Regenerated.
|
|
|
|
|
* generated/sum_r10.c: Regenerated.
|
|
|
|
|
* generated/sum_r16.c: Regenerated.
|
|
|
|
|
* generated/sum_r4.c: Regenerated.
|
|
|
|
|
* generated/sum_r8.c: Regenerated.
|
|
|
|
|
|
2008-04-25 22:11:19 +02:00
|
|
|
2008-04-25 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/35960
|
|
|
|
|
* m4/reshape.m4: Fix typo in last commit.
|
|
|
|
|
* generated/reshape_i4.c: Regererated.
|
|
|
|
|
* generated/reshape_i8.c: Regenerated.
|
|
|
|
|
* generated/reshape_i16.c: Regenerated.
|
|
|
|
|
* generated/reshape_r4.c: Regenerated.
|
|
|
|
|
* generated/reshape_r8.c: Regenerated.
|
|
|
|
|
* generated/reshape_r10.c: Regenerated.
|
|
|
|
|
* generated/reshape_r16.c: Regenerated.
|
|
|
|
|
* generated/reshape_c4.c: Regenerated.
|
|
|
|
|
* generated/reshape_c8.c: Regenerated.
|
|
|
|
|
* generated/reshape_c10.c: Regenerated.
|
|
|
|
|
* generated/reshape_c16.c: Regenerated.
|
|
|
|
|
|
2008-04-24 16:54:32 +02:00
|
|
|
2008-04-24 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
* intrinsics/time_1.h (__time_1): Remove unused variable.
|
|
|
|
|
|
2008-04-23 07:50:54 +02:00
|
|
|
2008-04-23 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/35988
|
|
|
|
|
* m4/matmul.m4: Only issue a runtime error if extents are
|
|
|
|
|
non-zero.
|
|
|
|
|
* generated/matmul_i1.c: Regenerated.
|
|
|
|
|
* generated/matmul_i2.c: Regenerated.
|
|
|
|
|
* generated/matmul_i4.c: Regenerated.
|
|
|
|
|
* generated/matmul_i8.c: Regenerated.
|
|
|
|
|
* generated/matmul_i16.c: Regenerated.
|
|
|
|
|
* generated/matmul_r4.c: Regenerated.
|
|
|
|
|
* generated/matmul_r8.c: Regenerated.
|
|
|
|
|
* generated/matmul_r10.c: Regenerated.
|
|
|
|
|
* generated/matmul_r16.c: Regenerated.
|
|
|
|
|
* generated/matmul_c4.c: Regenerated.
|
|
|
|
|
* generated/matmul_c8.c: Regenerated.
|
|
|
|
|
* generated/matmul_c10.c: Regenerated.
|
|
|
|
|
* generated/matmul_c16.c: Regenerated.
|
|
|
|
|
|
2008-04-21 22:55:19 +02:00
|
|
|
2008-04-21 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
|
|
|
|
|
|
|
|
|
|
* acinclude.m4 (LIBGFOR_CHECK_ATTRIBUTE_VISIBILITY)
|
|
|
|
|
(LIBGFOR_CHECK_ATTRIBUTE_DLLEXPORT)
|
|
|
|
|
(LIBGFOR_CHECK_ATTRIBUTE_ALIAS, LIBGFOR_CHECK_SYNC_FETCH_AND_ADD)
|
|
|
|
|
(LIBGFOR_GTHREAD_WEAK, LIBGFOR_CHECK_UNLINK_OPEN_FILE)
|
|
|
|
|
(LIBGFOR_CHECK_CRLF, LIBGFOR_CHECK_FOR_BROKEN_ISFINITE)
|
|
|
|
|
(LIBGFOR_CHECK_FOR_BROKEN_ISNAN)
|
|
|
|
|
(LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY, LIBGFOR_CHECK_WORKING_STAT)
|
|
|
|
|
(LIBGFOR_CHECK_FPSETMASK, LIBGFOR_CHECK_MINGW_SNPRINTF):
|
|
|
|
|
Fix cache variable names.
|
|
|
|
|
* configure, Makefile.in: Regenerate.
|
|
|
|
|
|
2008-04-20 23:06:16 +02:00
|
|
|
2008-04-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR fortran/35991
|
|
|
|
|
* intrinsics/cshift0.c (cshift0): Avoid divide by zero.
|
|
|
|
|
|
2008-04-20 21:56:07 +02:00
|
|
|
2008-04-20 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/35960
|
|
|
|
|
* intrinsics/reshape_generic.c (reshape_internal): If the size
|
|
|
|
|
of the resized array is zero, as determined by the SHAPE
|
|
|
|
|
argument, return early.
|
|
|
|
|
* m4/reshape.m4: Likewise.
|
|
|
|
|
* generated/reshape_i4.c: Regererated.
|
|
|
|
|
* generated/reshape_i8.c: Regenerated.
|
|
|
|
|
* generated/reshape_i16.c: Regenerated.
|
|
|
|
|
* generated/reshape_r4.c: Regenerated.
|
|
|
|
|
* generated/reshape_r8.c: Regenerated.
|
|
|
|
|
* generated/reshape_r10.c: Regenerated.
|
|
|
|
|
* generated/reshape_r16.c: Regenerated.
|
|
|
|
|
* generated/reshape_c4.c: Regenerated.
|
|
|
|
|
* generated/reshape_c8.c: Regenerated.
|
|
|
|
|
* generated/reshape_c10.c: Regenerated.
|
|
|
|
|
* generated/reshape_c16.c: Regenerated.
|
|
|
|
|
|
2008-04-18 12:28:53 +02:00
|
|
|
2008-04-18 Paolo Bonzini <bonzini@gnu.org>
|
|
|
|
|
|
|
|
|
|
PR bootstrap/35457
|
|
|
|
|
* aclocal.m4: Regenerate.
|
|
|
|
|
* configure: Regenerate.
|
|
|
|
|
|
2008-04-14 20:50:57 +02:00
|
|
|
2008-04-14 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/32972
|
|
|
|
|
* intrinsics/spread_generic.c (spread): Use spread_i2()
|
|
|
|
|
for GFC_DTYPE_DERIVED_2 (fix typo from previous commit).
|
|
|
|
|
|
2008-04-13 22:15:58 +02:00
|
|
|
2008-04-13 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/32972
|
|
|
|
|
PR libfortran/32512
|
|
|
|
|
configure.ac: Add test for uintptr_t.
|
|
|
|
|
configure: Regenerated.
|
|
|
|
|
config.h.in: Regenerated.
|
|
|
|
|
* libgfortran.h: GFC_DTYPE_DERIVED_1: New macro.
|
|
|
|
|
GFC_DTYPE_DERIVED_2: New macro.
|
|
|
|
|
GFC_DTYPE_DERIVED_4: New macro.
|
|
|
|
|
GFC_DTYPE_DERIVED_8: New macro.
|
|
|
|
|
GFC_DTYPE_DERIVED_16: New macro.
|
|
|
|
|
GFC_UNALIGNED_2: New macro.
|
|
|
|
|
GFC_UNALIGNED_4: New macro.
|
|
|
|
|
GFC_UNALIGNED_8: New macro.
|
|
|
|
|
GFC_UNALIGNED_16: New macro.
|
|
|
|
|
intptr_t: Define if we don't have it.
|
|
|
|
|
uintptr_t: Likewise.
|
|
|
|
|
* runtime/backtrace.c (show_backtrace): Use intptr_t.
|
|
|
|
|
* intrinsics/signal.c (signal_sub): Likewise.
|
|
|
|
|
(signal_sub_int): Likewise.
|
|
|
|
|
(alarm_sub_int_i4): Likewise.
|
|
|
|
|
* intrinsics/spread_generic.c (spread): Use the integer
|
|
|
|
|
routines for handling derived types of sizes 1, 2, 4, 8 and 16
|
|
|
|
|
if the alignment of all pointers is correct.
|
|
|
|
|
(spread_scalar): Likewise.
|
|
|
|
|
* intrinsics/pack_generic.c (pack): Likewise.
|
|
|
|
|
Use GFD_DTYPE_TYPE_SIZE to avoid nested switch statements.
|
|
|
|
|
* intrinsics/unpack_generic.c (unpack1): Likewise.
|
|
|
|
|
(unpack0): Likewise.
|
|
|
|
|
* runtime/in_pack_generic.c (internal_pack): Likewise.
|
|
|
|
|
* runtime/in_unpack_generic.c (internal_unpack): Likewise.
|
|
|
|
|
|
2008-04-09 11:00:31 +02:00
|
|
|
2008-04-09 Jakub Jelinek <jakub@redhat.com>
|
|
|
|
|
|
|
|
|
|
* io/list_read.c (snprintf): Define if HAVE_SNPRINTF isn't defined.
|
|
|
|
|
(nml_read_obj): Add nml_err_msg_size argument. Pass it down to
|
|
|
|
|
recursive call. Use snprintf instead of sprintf when %s nl->var_name
|
|
|
|
|
is used.
|
|
|
|
|
(nml_get_obj_data): Add nml_err_msg_size argument. Pass it down to
|
|
|
|
|
nml_read_obj call. Use snprintf instead of sprintf when %s
|
|
|
|
|
nl->var_name is used. Pass nml_err_msg to nml_parse_qualifier instead
|
|
|
|
|
of parse_err_msg array. Append " for namelist variable " and
|
|
|
|
|
nl->var_name to it.
|
|
|
|
|
(namelist_read): Increase size of nml_err_msg array to 200. Pass
|
|
|
|
|
sizeof nml_err_msg as extra argument to nml_get_obj_data.
|
|
|
|
|
|
2008-04-08 00:05:52 +02:00
|
|
|
2008-04-07 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR fortran/25829 28655
|
|
|
|
|
* io/open.c (edit_modes): Set flags.async. (new_unit) Set flags.async
|
|
|
|
|
and flags.status. (st_open): Initialize flags.async.
|
|
|
|
|
* io/list_read.c (read_charactor): Use delim_status instead of
|
|
|
|
|
flags.delim.
|
|
|
|
|
* io/read.c (read_x): Use pad_status instead of flags.pad.
|
|
|
|
|
* io/inquire.c (inquire_via_unit): Add new checks.
|
|
|
|
|
(inquire_via_filename): Likewise.
|
|
|
|
|
* io/io.h (st_parameter_inquire): Add new flags.
|
|
|
|
|
(st_parameter_dt): Likewise.
|
|
|
|
|
* io/unit.c (get_internal_unit): Set flags.async. (init_units): Set
|
|
|
|
|
flags.async.
|
|
|
|
|
* io/transfer.c: Add delim and pad option arrays. (read_sf): Use
|
|
|
|
|
pad_status instead of flags.pad. (read_block): Likewise.
|
|
|
|
|
(data_transfer_init): Set flags.async and add checks.
|
|
|
|
|
* io/write.c (write_character): Use delim_status.
|
|
|
|
|
(list_formatted_write_scalar): Likewise. (nml_write_obj): Likewise.
|
|
|
|
|
(namelist_write): Likewise.
|
|
|
|
|
|
PR fortran/25829 28655
2008-04-05 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR fortran/25829 28655
* gfortran.map: Add new symbol, _gfortran_st_wait.
* libgfortran.h (st_paramter_common): Add new I/O parameters.
* open.c (st_option decimal_opt[], st_option encoding_opt[],
st_option round_opt[], st_option sign_opt[], st_option async_opt[]): New
parameter option arrays. (edit_modes): Add checks for new parameters.
(new_unit): Likewise. (st_open): Likewise.
* list_read.c (CASE_SEPERATORS): Add ';' as a valid separator.
(eat_separator): Handle deimal comma. (read_logical): Fix whitespace.
(parse_real): Handle decimal comma. (read_real): Handle decimal comma.
* read.c (read_a): Use decimal status flag to allow comma in place of a
decimal point. (read_f): Allow comma as acceptable character in float.
According to decimal flag, substitute a period for a comma.
(read_x): If decimal status flag is comma, disable the read_comma flag,
not allowing comma as a delimiter, an extension otherwise.
* io.h: (unit_decimal, unit_encoding, unit_round, unit_sign,
unit_async): New enumerators. Add all new I/O parameters.
* unix.c (unix_stream, int_stream): Add io_mode asychronous I/O control.
(move_pos_offset, fd_alloc_w_at): Fix some whitespace.
(fd_sfree): Use new enumerator. (fd_read): Likewise.
(fd_write): Likewise. (fd_close): Fix whitespace.
(fd_open): Use new enumertors. (tempfile, regular_file,
open_external): Fix whitespace. (output_stream, error_stream): Set
method. (stream_offset): Fix whitespace.
* transfer.c: (st_option decimal_opt[], sign_opt[], blank_opt[]): New
option arrays. (formatted_transfer_scalar): Set sf_read_comma flag
based on new decimal_status flag. (data_transfer_init): Initialize new
parameters. Add checks for decimal, sign, and blank. (st_wait): New stub.
* format.c: (format_lex): Add format specifiers DP, DC, and D.
(parse_format_list): Parse the new specifiers.
* write.c (write_decimal): Use new sign enumerators to set the sign.
(write_complex): Handle decimal comma and semi-colon separator.
(nml_write_obj): Likewise.
* write_float.def: Revise sign enumerators. (calculate_sign): Use new
sign enumerators. (output_float): Likewise. Use new decimal_status flag
to set the decimal character to a point or a comma.
From-SVN: r133943
2008-04-06 00:18:03 +02:00
|
|
|
2008-04-05 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR fortran/25829 28655
|
|
|
|
|
* gfortran.map: Add new symbol, _gfortran_st_wait.
|
|
|
|
|
* libgfortran.h (st_paramter_common): Add new I/O parameters.
|
|
|
|
|
* open.c (st_option decimal_opt[], st_option encoding_opt[],
|
|
|
|
|
st_option round_opt[], st_option sign_opt[], st_option async_opt[]): New
|
|
|
|
|
parameter option arrays. (edit_modes): Add checks for new parameters.
|
|
|
|
|
(new_unit): Likewise. (st_open): Likewise.
|
|
|
|
|
* list_read.c (CASE_SEPERATORS): Add ';' as a valid separator.
|
|
|
|
|
(eat_separator): Handle deimal comma. (read_logical): Fix whitespace.
|
|
|
|
|
(parse_real): Handle decimal comma. (read_real): Handle decimal comma.
|
|
|
|
|
* read.c (read_a): Use decimal status flag to allow comma in place of a
|
|
|
|
|
decimal point. (read_f): Allow comma as acceptable character in float.
|
|
|
|
|
According to decimal flag, substitute a period for a comma.
|
|
|
|
|
(read_x): If decimal status flag is comma, disable the read_comma flag,
|
|
|
|
|
not allowing comma as a delimiter, an extension otherwise.
|
|
|
|
|
* io.h: (unit_decimal, unit_encoding, unit_round, unit_sign,
|
|
|
|
|
unit_async): New enumerators. Add all new I/O parameters.
|
|
|
|
|
* unix.c (unix_stream, int_stream): Add io_mode asychronous I/O control.
|
|
|
|
|
(move_pos_offset, fd_alloc_w_at): Fix some whitespace.
|
|
|
|
|
(fd_sfree): Use new enumerator. (fd_read): Likewise.
|
|
|
|
|
(fd_write): Likewise. (fd_close): Fix whitespace.
|
|
|
|
|
(fd_open): Use new enumertors. (tempfile, regular_file,
|
|
|
|
|
open_external): Fix whitespace. (output_stream, error_stream): Set
|
|
|
|
|
method. (stream_offset): Fix whitespace.
|
|
|
|
|
* transfer.c: (st_option decimal_opt[], sign_opt[], blank_opt[]): New
|
|
|
|
|
option arrays. (formatted_transfer_scalar): Set sf_read_comma flag
|
|
|
|
|
based on new decimal_status flag. (data_transfer_init): Initialize new
|
|
|
|
|
parameters. Add checks for decimal, sign, and blank. (st_wait): New stub.
|
|
|
|
|
* format.c: (format_lex): Add format specifiers DP, DC, and D.
|
|
|
|
|
(parse_format_list): Parse the new specifiers.
|
|
|
|
|
* write.c (write_decimal): Use new sign enumerators to set the sign.
|
|
|
|
|
(write_complex): Handle decimal comma and semi-colon separator.
|
|
|
|
|
(nml_write_obj): Likewise.
|
|
|
|
|
* write_float.def: Revise sign enumerators. (calculate_sign): Use new
|
|
|
|
|
sign enumerators. (output_float): Likewise. Use new decimal_status flag
|
|
|
|
|
to set the decimal character to a point or a comma.
|
|
|
|
|
|
re PR libfortran/32972 (performance of pack/unpack)
2008-03-28 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/32972
PR libfortran/32512
* Makefile.am: Add new variable, i_spread_c, containing
pack_i1.c, pack_i2.c, pack_i4.c, pack_i8.c, spread_i16.c,
spread_r4.c, spread_r8.c, spread_r10.c, spread_r16.c,
spread_c4.c, spread_c8.c, spread_c10.c, spread_c16.c.
* Makefile.in: Regenerated.
* libgfortran.h: Add prototypes for spread_i1, spread_i2,
spread_i4, spread_i8, spread_i16, spread_r4, spread_r8,
spread_c4, spread_c8, spread_c10, spread_c16,
spread_scalar_i1, spread_scalar_i2, spread_scalar_i4,
spread_scalar_i8, spread_scalar_i16, spread_scalar_r4
spread_scalar_r8, spread_scalar_c4, spread_scalar_c8,
spread_scalar_c10 and spread_scalar_c16.
Add macros to isolate both type and size information
from array descriptors with a single mask operation.
* intrinsics/spread_generic.c: Add calls to specific
spread functions.
* m4/spread.m4: New file.
* generated/spread_i1.c: New file.
* generated/spread_i2.c: New file.
* generated/spread_i4.c: New file.
* generated/spread_i8.c: New file.
* generated/spread_i16.c: New file.
* generated/spread_r4.c: New file.
* generated/spread_r8.c: New file.
* generated/spread_r10.c: New file.
* generated/spread_r16.c: New file.
* generated/spread_c4.c: New file.
* generated/spread_c8.c: New file.
* generated/spread_c10.c: New file.
* generated/spread_c16.c: New file.
2008-03-28 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/32972
PR libfortran/32512
* intrinsic_spread_1.f90: New file.
* intrinsic_spread_2.f90: New file.
* intrinsic_spread_3.f90: New file.
From-SVN: r133702
2008-03-29 00:22:49 +01:00
|
|
|
2008-03-28 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/32972
|
|
|
|
|
PR libfortran/32512
|
|
|
|
|
* Makefile.am: Add new variable, i_spread_c, containing
|
|
|
|
|
pack_i1.c, pack_i2.c, pack_i4.c, pack_i8.c, spread_i16.c,
|
|
|
|
|
spread_r4.c, spread_r8.c, spread_r10.c, spread_r16.c,
|
|
|
|
|
spread_c4.c, spread_c8.c, spread_c10.c, spread_c16.c.
|
|
|
|
|
* Makefile.in: Regenerated.
|
|
|
|
|
* libgfortran.h: Add prototypes for spread_i1, spread_i2,
|
|
|
|
|
spread_i4, spread_i8, spread_i16, spread_r4, spread_r8,
|
|
|
|
|
spread_c4, spread_c8, spread_c10, spread_c16,
|
|
|
|
|
spread_scalar_i1, spread_scalar_i2, spread_scalar_i4,
|
|
|
|
|
spread_scalar_i8, spread_scalar_i16, spread_scalar_r4
|
|
|
|
|
spread_scalar_r8, spread_scalar_c4, spread_scalar_c8,
|
|
|
|
|
spread_scalar_c10 and spread_scalar_c16.
|
|
|
|
|
Add macros to isolate both type and size information
|
|
|
|
|
from array descriptors with a single mask operation.
|
|
|
|
|
* intrinsics/spread_generic.c: Add calls to specific
|
|
|
|
|
spread functions.
|
|
|
|
|
* m4/spread.m4: New file.
|
|
|
|
|
* generated/spread_i1.c: New file.
|
|
|
|
|
* generated/spread_i2.c: New file.
|
|
|
|
|
* generated/spread_i4.c: New file.
|
|
|
|
|
* generated/spread_i8.c: New file.
|
|
|
|
|
* generated/spread_i16.c: New file.
|
|
|
|
|
* generated/spread_r4.c: New file.
|
|
|
|
|
* generated/spread_r8.c: New file.
|
|
|
|
|
* generated/spread_r10.c: New file.
|
|
|
|
|
* generated/spread_r16.c: New file.
|
|
|
|
|
* generated/spread_c4.c: New file.
|
|
|
|
|
* generated/spread_c8.c: New file.
|
|
|
|
|
* generated/spread_c10.c: New file.
|
|
|
|
|
* generated/spread_c16.c: New file.
|
|
|
|
|
|
2008-03-28 23:13:17 +01:00
|
|
|
2008-03-28 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/35699
|
|
|
|
|
* io/transfer.c (write_buf): Don't pad the record, just return if the
|
|
|
|
|
data is NULL. (next_record_w): If there are bytes left in the record
|
|
|
|
|
for unformatted direct I/O, pad out the record with zero bytes.
|
|
|
|
|
|
2008-03-28 14:47:06 +01:00
|
|
|
2008-03-28 Tobias Burnus <burnus@net-b.de>
|
|
|
|
|
|
|
|
|
|
PR fortran/35721
|
|
|
|
|
* intrinsics/associated.c (associated): Ignore different
|
|
|
|
|
stride of pointer vs. target if only one element is referred.
|
|
|
|
|
|
2008-03-27 06:30:18 +01:00
|
|
|
2008-03-26 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
* io/unix.c (fd_close): Do not close STDIN.
|
|
|
|
|
|
re PR libfortran/32972 (performance of pack/unpack)
2007-03-23 Thomas Koenig <tkoenig@gcc.gnu.org
PR libfortran/32972
* Makefile.am: Add new variable, i_unpack_c, containing
unpack_i1.c, unpack_i2.c, unpack_i4.c, unpack_i8.c,
unpack_i16.c, unpack_r4.c, unpack_r8.c, unpack_r10.c,
unpack_r16.c, unpack_c4.c, unpack_c8.c, unpack_c10.c
and unpack_c16.c
Add i_unpack_c to gfor_built_src.
Add rule to generate i_unpack_c from m4/unpack.m4.
* Makefile.in: Regenerated.
* libgfortran.h: Add prototypes for unpack0_i1, unpack0_i2,
unpack0_i4, unpack0_i8, unpack0_i16, unpack0_r4, unpack0_r8,
unpack0_r10, unpack0_r16, unpack0_c4, unpack0_c8, unpack0_c10,
unpack0_c16, unpack1_i1, unpack1_i2, unpack1_i4, unpack1_i8,
unpack1_i16, unpack1_r4, unpack1_r8, unpack1_r10, unpack1_r16,
unpack1_c4, unpack1_c8, unpack1_c10 and unpack1_c16.
* intrinsics/pack_generic.c (unpack1): Add calls to specific
unpack1 functions.
(unpack0): Add calls to specific unpack0 functions.
* m4/unpack.m4: New file.
* generated/unpack_i1.c: New file.
* generated/unpack_i2.c: New file.
* generated/unpack_i4.c: New file.
* generated/unpack_i8.c: New file.
* generated/unpack_i16.c: New file.
* generated/unpack_r4.c: New file.
* generated/unpack_r8.c: New file.
* generated/unpack_r10.c: New file.
* generated/unpack_r16.c: New file.
* generated/unpack_c4.c: New file.
* generated/unpack_c8.c: New file.
* generated/unpack_c10.c: New file.
* generated/unpack_c16.c: New file.
2007-03-23 Thomas Koenig <tkoenig@gcc.gnu.org
PR libfortran/32972
* gfortran.dg/intrinsic_unpack_1.f90: New test case.
* gfortran.dg/intrinsic_unpack_2.f90: New test case.
* gfortran.dg/intrinsic_unpack_3.f90: New test case.
From-SVN: r133469
2008-03-23 23:19:19 +01:00
|
|
|
2007-03-23 Thomas Koenig <tkoenig@gcc.gnu.org
|
|
|
|
|
|
|
|
|
|
PR libfortran/32972
|
|
|
|
|
* Makefile.am: Add new variable, i_unpack_c, containing
|
|
|
|
|
unpack_i1.c, unpack_i2.c, unpack_i4.c, unpack_i8.c,
|
|
|
|
|
unpack_i16.c, unpack_r4.c, unpack_r8.c, unpack_r10.c,
|
|
|
|
|
unpack_r16.c, unpack_c4.c, unpack_c8.c, unpack_c10.c
|
|
|
|
|
and unpack_c16.c
|
|
|
|
|
Add i_unpack_c to gfor_built_src.
|
|
|
|
|
Add rule to generate i_unpack_c from m4/unpack.m4.
|
|
|
|
|
* Makefile.in: Regenerated.
|
|
|
|
|
* libgfortran.h: Add prototypes for unpack0_i1, unpack0_i2,
|
|
|
|
|
unpack0_i4, unpack0_i8, unpack0_i16, unpack0_r4, unpack0_r8,
|
|
|
|
|
unpack0_r10, unpack0_r16, unpack0_c4, unpack0_c8, unpack0_c10,
|
|
|
|
|
unpack0_c16, unpack1_i1, unpack1_i2, unpack1_i4, unpack1_i8,
|
|
|
|
|
unpack1_i16, unpack1_r4, unpack1_r8, unpack1_r10, unpack1_r16,
|
|
|
|
|
unpack1_c4, unpack1_c8, unpack1_c10 and unpack1_c16.
|
|
|
|
|
* intrinsics/pack_generic.c (unpack1): Add calls to specific
|
|
|
|
|
unpack1 functions.
|
|
|
|
|
(unpack0): Add calls to specific unpack0 functions.
|
|
|
|
|
* m4/unpack.m4: New file.
|
|
|
|
|
* generated/unpack_i1.c: New file.
|
|
|
|
|
* generated/unpack_i2.c: New file.
|
|
|
|
|
* generated/unpack_i4.c: New file.
|
|
|
|
|
* generated/unpack_i8.c: New file.
|
|
|
|
|
* generated/unpack_i16.c: New file.
|
|
|
|
|
* generated/unpack_r4.c: New file.
|
|
|
|
|
* generated/unpack_r8.c: New file.
|
|
|
|
|
* generated/unpack_r10.c: New file.
|
|
|
|
|
* generated/unpack_r16.c: New file.
|
|
|
|
|
* generated/unpack_c4.c: New file.
|
|
|
|
|
* generated/unpack_c8.c: New file.
|
|
|
|
|
* generated/unpack_c10.c: New file.
|
|
|
|
|
* generated/unpack_c16.c: New file.
|
|
|
|
|
|
2008-03-22 23:03:13 +01:00
|
|
|
2008-03-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/35632
|
|
|
|
|
* io/transfer.c (data_transfer_init): Fix whitespace.
|
|
|
|
|
(next_record_w): Truncate the file only if the stream
|
|
|
|
|
position is short of the file end.
|
|
|
|
|
|
2008-03-21 22:00:17 +01:00
|
|
|
2008-03-21 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
* intrinsics/pack_generic.c: Fix typo.
|
|
|
|
|
|
2008-03-21 18:36:00 +01:00
|
|
|
2008-03-21 Janne Blomqvist <jb@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
* gfortran.map: Move erfc_scaled symbols to new symbol node
|
|
|
|
|
GFORTRAN_1.1, thereby fixing ABI bug introduced in r132846.
|
|
|
|
|
|
2008-03-21 16:33:13 +01:00
|
|
|
2008-03-21 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/32972
|
|
|
|
|
* runtime/in_pack_generic.c (internal_pack): Call correct
|
|
|
|
|
function, pack_i16, for GFC_INTEGER_16.
|
|
|
|
|
|
re PR libfortran/32972 (performance of pack/unpack)
2008-03-21 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/32972
* Makefile.am: Add new variable, i_pack_c, containing
pack_i1.c, pack_i2.c, pack_i4.c, pack_i8.c, pack_i16.c,
pack_r4.c, pack_r8.c, pack_r10.c, pack_r16.c, pack_c4.c,
pack_c8.c, pack_c10.c, pack_c16.c.
Add m4/pack.m4 to m4_files.
Add i_pack_c to gfor_built_src.
Add rule to generate i_pack_c from m4/pack.m4.
* Makefile.in: Regenerated.
* libgfortran.h: Add prototypes for pack_i1, pack_i2, pack_i4,
pack_i8, pack_i16, pack_r4, pack_r8, pack_c4, pack_c8,
pack_c10, pack_c16.
* intrinsics/pack_generic.c: Add calls to specific
pack functions.
* m4/pack.m4: New file.
* generated/pack_i1.c: New file.
* generated/pack_i2.c: New file.
* generated/pack_i4.c: New file.
* generated/pack_i8.c: New file.
* generated/pack_i16.c: New file.
* generated/pack_r4.c: New file.
* generated/pack_r8.c: New file.
* generated/pack_r10.c: New file.
* generated/pack_r16.c: New file.
* generated/pack_c4.c: New file.
* generated/pack_c8.c: New file.
* generated/pack_c10.c: New file.
* generated/pack_c16.c: New file.
2008-03-21 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/32972
* internal_pack_1.f90: New test case.
* internal_pack_2.f90: New test case.
* internal_pack_3.f90: New test case.
From-SVN: r133427
2008-03-21 15:37:03 +01:00
|
|
|
2008-03-21 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/32972
|
|
|
|
|
* Makefile.am: Add new variable, i_pack_c, containing
|
|
|
|
|
pack_i1.c, pack_i2.c, pack_i4.c, pack_i8.c, pack_i16.c,
|
|
|
|
|
pack_r4.c, pack_r8.c, pack_r10.c, pack_r16.c, pack_c4.c,
|
|
|
|
|
pack_c8.c, pack_c10.c, pack_c16.c.
|
|
|
|
|
Add m4/pack.m4 to m4_files.
|
|
|
|
|
Add i_pack_c to gfor_built_src.
|
|
|
|
|
Add rule to generate i_pack_c from m4/pack.m4.
|
|
|
|
|
* Makefile.in: Regenerated.
|
|
|
|
|
* libgfortran.h: Add prototypes for pack_i1, pack_i2, pack_i4,
|
|
|
|
|
pack_i8, pack_i16, pack_r4, pack_r8, pack_c4, pack_c8,
|
|
|
|
|
pack_c10, pack_c16.
|
|
|
|
|
* intrinsics/pack_generic.c: Add calls to specific
|
|
|
|
|
pack functions.
|
|
|
|
|
* m4/pack.m4: New file.
|
|
|
|
|
* generated/pack_i1.c: New file.
|
|
|
|
|
* generated/pack_i2.c: New file.
|
|
|
|
|
* generated/pack_i4.c: New file.
|
|
|
|
|
* generated/pack_i8.c: New file.
|
|
|
|
|
* generated/pack_i16.c: New file.
|
|
|
|
|
* generated/pack_r4.c: New file.
|
|
|
|
|
* generated/pack_r8.c: New file.
|
|
|
|
|
* generated/pack_r10.c: New file.
|
|
|
|
|
* generated/pack_r16.c: New file.
|
|
|
|
|
* generated/pack_c4.c: New file.
|
|
|
|
|
* generated/pack_c8.c: New file.
|
|
|
|
|
* generated/pack_c10.c: New file.
|
|
|
|
|
* generated/pack_c16.c: New file.
|
|
|
|
|
|
2008-03-20 03:05:05 +01:00
|
|
|
2008-03-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/35627
|
|
|
|
|
* io/list_read.c (free_line): Clear the line buffer enable flag and
|
|
|
|
|
reset the index into line_buffer, aka item_count.
|
|
|
|
|
(next_char): Cleanup whitespace.
|
|
|
|
|
(read_logical): Use unget_char to assure that the first character of the
|
|
|
|
|
bad logical is saved in case it is part of an object name. Remove the
|
|
|
|
|
clearing of index and flag that is now in free_line.
|
|
|
|
|
(read_real): Likewise.
|
|
|
|
|
|
2008-03-19 17:56:22 +01:00
|
|
|
2008-03-19 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/32972
|
|
|
|
|
* runtime/in_pack_generic.c (internal_pack): Fix typo in
|
|
|
|
|
last commit.
|
|
|
|
|
|
re PR libfortran/32972 (performance of pack/unpack)
2008-03-19 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/32972
* Makefile.am (in_pack_c): Add in_pack_i1.c, in_pack_i2.c,
in_pack_r4.c, in_pack_r8.c, in_pack_r10.c and in_pack_r16.c.
(in_unpack_c): Add in_unpack_i1.c, in_unpack_i2.c,
in_unpack_r4.c, in_unpack_r8.c, in_unpack_r10.c and
in_unpack_r16.c.
* Makefile.in: Regenerate.
* libgfortran.h: Add prototypes for internal_pack_1,
internal_pack_2, internal_pack_16, internal_pack_r4,
internal_pack_r8, internal_pack_r10, internal_pack_r16,
internal_pack_c10 and internal_pack_c16. Add prototypes for
internal_unpack_1, internal_unpack_2, internal_unpack_16,
internal_unpack_r4, internal_unpack_r8, internal_unpack_r10,
internal_unpack_r16, internal_unpack_c10 and
internal_unpack_c16.
* runtime/in_pack_generic.c (internal_pack): Use sizeof instead
of hardwired sizes.
Add calls to internal_pack_1, internal_pack_2,
internal_pack_16, internal_pack_r4, internal_pack_r8,
internal_pack_r10, internal_pack_r16, internal_pack_c10 and
internal_pack_c16.
* runtime/in_unpack_generic.c (internal_unpack): Use sizeof
instead of hardwired sizes.
Add calls to internal_unpack_1, internal_unpack_2,
internal_unpack_16, internal_unpack_r4, internal_unpack_r8,
internal_unpack_r10, internal_unpack_r16, internal_unpack_c10
and internal_unpack_c16.
* generated/in_pack_r4.c: New file.
* generated/in_pack_i2.c: New file.
* generated/in_unpack_i1.c: New file.
* generated/in_pack_r10.c: New file.
* generated/in_unpack_r4.c: New file.
* generated/in_unpack_i2.c: New file.
* generated/in_unpack_r16.c: New file.
* generated/in_pack_r8.c: New file.
* generated/in_unpack_r10.c: New file.
* generated/in_unpack_r8.c: New file.
* generated/in_pack_r16.c: New file.
* generated/in_pack_i1.c: New file.
2008-03-19 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/32972
* gfortran.dg/internal_pack_1.f90: New test case.
* gfortran.dg/internal_pack_2.f90: New test case.
* gfortran.dg/internal_pack_3.f90: New test case.
From-SVN: r133344
2008-03-19 16:42:55 +01:00
|
|
|
2008-03-19 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/32972
|
|
|
|
|
* Makefile.am (in_pack_c): Add in_pack_i1.c, in_pack_i2.c,
|
|
|
|
|
in_pack_r4.c, in_pack_r8.c, in_pack_r10.c and in_pack_r16.c.
|
|
|
|
|
(in_unpack_c): Add in_unpack_i1.c, in_unpack_i2.c,
|
|
|
|
|
in_unpack_r4.c, in_unpack_r8.c, in_unpack_r10.c and
|
|
|
|
|
in_unpack_r16.c.
|
|
|
|
|
* Makefile.in: Regenerate.
|
|
|
|
|
* libgfortran.h: Add prototypes for internal_pack_1,
|
|
|
|
|
internal_pack_2, internal_pack_16, internal_pack_r4,
|
|
|
|
|
internal_pack_r8, internal_pack_r10, internal_pack_r16,
|
|
|
|
|
internal_pack_c10 and internal_pack_c16. Add prototypes for
|
|
|
|
|
internal_unpack_1, internal_unpack_2, internal_unpack_16,
|
|
|
|
|
internal_unpack_r4, internal_unpack_r8, internal_unpack_r10,
|
|
|
|
|
internal_unpack_r16, internal_unpack_c10 and
|
|
|
|
|
internal_unpack_c16.
|
|
|
|
|
* runtime/in_pack_generic.c (internal_pack): Use sizeof instead
|
|
|
|
|
of hardwired sizes.
|
|
|
|
|
Add calls to internal_pack_1, internal_pack_2,
|
|
|
|
|
internal_pack_16, internal_pack_r4, internal_pack_r8,
|
|
|
|
|
internal_pack_r10, internal_pack_r16, internal_pack_c10 and
|
|
|
|
|
internal_pack_c16.
|
|
|
|
|
* runtime/in_unpack_generic.c (internal_unpack): Use sizeof
|
|
|
|
|
instead of hardwired sizes.
|
|
|
|
|
Add calls to internal_unpack_1, internal_unpack_2,
|
|
|
|
|
internal_unpack_16, internal_unpack_r4, internal_unpack_r8,
|
|
|
|
|
internal_unpack_r10, internal_unpack_r16, internal_unpack_c10
|
|
|
|
|
and internal_unpack_c16.
|
|
|
|
|
* generated/in_pack_r4.c: New file.
|
|
|
|
|
* generated/in_pack_i2.c: New file.
|
|
|
|
|
* generated/in_unpack_i1.c: New file.
|
|
|
|
|
* generated/in_pack_r10.c: New file.
|
|
|
|
|
* generated/in_unpack_r4.c: New file.
|
|
|
|
|
* generated/in_unpack_i2.c: New file.
|
|
|
|
|
* generated/in_unpack_r16.c: New file.
|
|
|
|
|
* generated/in_pack_r8.c: New file.
|
|
|
|
|
* generated/in_unpack_r10.c: New file.
|
|
|
|
|
* generated/in_unpack_r8.c: New file.
|
|
|
|
|
* generated/in_pack_r16.c: New file.
|
|
|
|
|
* generated/in_pack_i1.c: New file.
|
|
|
|
|
|
2008-03-18 05:27:56 +01:00
|
|
|
2008-03-17 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/35617
|
|
|
|
|
* io/list_read.c (eat_separator): If next character after eatline is '!'
|
|
|
|
|
then eatline again.
|
|
|
|
|
|
2008-03-16 09:19:08 +01:00
|
|
|
2008-03-16 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
|
|
|
|
|
|
|
|
|
|
* aclocal.m4: Regenerate.
|
|
|
|
|
* configure: Likewise.
|
|
|
|
|
* Makefile.in: Likewise.
|
|
|
|
|
|
2008-03-12 11:24:29 +01:00
|
|
|
2008-03-12 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/35524
|
|
|
|
|
* intrinsics/erfc_scaled_inc.c: Only define the long double
|
|
|
|
|
variant of erfc_scaled if expl is available.
|
|
|
|
|
|
2008-03-11 11:49:13 +01:00
|
|
|
2008-03-11 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/32812
|
|
|
|
|
* intrinsics/random.c (scramble_seed, unscramble_seed): New
|
|
|
|
|
functions.
|
|
|
|
|
(random_seed_i4): Scramble the seed the user gives us before
|
|
|
|
|
storing it, and unscramble it when we return it back later.
|
|
|
|
|
|
2008-03-05 02:50:33 +01:00
|
|
|
2008-03-05 Hans-Peter Nilsson <hp@axis.com>
|
|
|
|
|
|
|
|
|
|
PR libfortran/35293
|
|
|
|
|
* io/unix.c (fd_truncate): Fold s->special_file case into
|
|
|
|
|
success case of ftruncate/chsize call instead of the failure case.
|
|
|
|
|
Make failure case actually return failure. Properly update stream
|
|
|
|
|
pointers on failure. Call runtime_error for targets without
|
|
|
|
|
neither ftruncate nor chsize where such a call would be needed.
|
|
|
|
|
|
re PR fortran/33197 (Fortran 2008: math functions)
PR fortran/33197
gcc/fortran/
* intrinsic.c (add_functions): Modify intrinsics ACOSH, ASINH,
ATANH, ERF, ERFC and GAMMA. Add intrinsics BESSEL_{J,Y}{0,1,N},
ERFC_SCALED, LOG_GAMMA and HYPOT.
* intrinsic.h (gfc_check_hypot, gfc_simplify_hypot,
gfc_resolve_hypot): New prototypes.
* mathbuiltins.def: Add HYPOT builtin. Make complex versions of
ACOSH, ASINH and ATANH available.
* gfortran.h (GFC_ISYM_ERFC_SCALED, GFC_ISYM_HYPOT): New values.
* lang.opt: Add -std=f2008 option.
* libgfortran.h: Define GFC_STD_F2008.
* lang-specs.h: Add .f08 and .F08 file suffixes.
* iresolve.c (gfc_resolve_hypot): New function.
* parse.c (parse_contained): Allow empty CONTAINS for Fortran 2008.
* check.c (gfc_check_hypot): New function.
* trans-intrinsic.c (gfc_intrinsic_map): Define ERFC_SCALE builtin.
* options.c (set_default_std_flags): Allow Fortran 2008 by default.
(form_from_filename): Add .f08 suffix.
(gfc_handle_option): Handle -std=f2008 option.
* simplify.c (gfc_simplify_hypot): New function.
* gfortran.texi: Document Fortran 2008 status and file extensions.
* intrinsic.texi: Document new BESSEL_{J,Y}{0,1,N} intrinsics,
as well as HYPOT and ERFC_SCALED. Update documentation of ERF,
ERFC, GAMMA, LGAMMA, ASINH, ACOSH and ATANH.
* invoke.texi: Document the new -std=f2008 option.
libgomp/
* testsuite/libgomp.fortran/fortran.exp: Add .f08 and
.F08 file suffixes.
gcc/testsuite/
* gfortran.dg/gomp/gomp.exp: Add .f08 and .F08 file suffixes.
* gfortran.dg/dg.exp: Likewise.
* gfortran.dg/vect/vect.exp: Likewise.
* gfortran.fortran-torture/execute/execute.exp: Likewise.
* gfortran.fortran-torture/compile/compile.exp: Likewise.
* gfortran.dg/gamma_1.f90: Also check log_gamma.
* gfortran.dg/invalid_contains_1.f90: Remove warning about
empty CONTAINS.
* gfortran.dg/gamma_2.f90: Add a few error messages.
* gfortran.dg/invalid_contains_2.f90: Remove warning about
empty CONTAINS.
* gfortran.dg/gamma_3.f90: Adjust error message.
* gfortran.dg/gamma_4.f90: Test for log_gamma instead of lgamma.
* gfortran.dg/bind_c_usage_9.f03: Adjust error messages.
* gfortran.dg/bessel_1.f90: New test.
* gfortran.dg/recursive_check_3.f90: Remove warnings.
* gfortran.dg/besxy.f90: Also check for new F2008 intrinsics.
* gfortran.dg/derived_function_interface_1.f90: Remove warning.
* gfortran.dg/contains_empty_1.f03: New test.
* gfortran.dg/erfc_scaled_1.f90: New test.
* gfortran.dg/hypot_1.f90: New test.
* gfortran.dg/contains_empty_2.f03: New test.
libgfortran/
* intrinsics/erfc_scaled_inc.c: New file.
* intrinsics/erfc_scaled.c: New file.
* gfortran.map (GFORTRAN_1.0): Add _gfortran_erfc_scaled_r*.
* Makefile.am: Add intrinsics/erfc_scaled.c.
* config.h.in: Regenerate.
* configure: Regenerate.
* Makefile.in: Regenerate.
From-SVN: r132846
2008-03-04 00:46:20 +01:00
|
|
|
2008-03-03 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR fortran/33197
|
|
|
|
|
* intrinsics/erfc_scaled_inc.c: New file.
|
|
|
|
|
* intrinsics/erfc_scaled.c: New file.
|
|
|
|
|
* gfortran.map (GFORTRAN_1.0): Add _gfortran_erfc_scaled_r*.
|
|
|
|
|
* Makefile.am: Add intrinsics/erfc_scaled.c.
|
|
|
|
|
* config.h.in: Regenerate.
|
|
|
|
|
* configure: Regenerate.
|
|
|
|
|
* Makefile.in: Regenerate.
|
|
|
|
|
|
2008-03-01 23:15:31 +01:00
|
|
|
2008-03-01 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/35355
|
|
|
|
|
* intrinsics/time_1.h (__time_1): Fix calculation of user_usec
|
|
|
|
|
for mingw.
|
|
|
|
|
|
2008-03-01 11:46:31 +01:00
|
|
|
2008-03-01 Janne Blomqvist <jb@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/35063
|
|
|
|
|
* io/unit.c (destroy_unit_mutex): Call __gthread_mutex_destroy
|
|
|
|
|
instead of macro kludge.
|
|
|
|
|
|
2008-02-25 20:27:28 +01:00
|
|
|
2008-02-25 Janne Blomqvist <jb@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR fortran/29549
|
re PR fortran/33197 (Fortran 2008: math functions)
PR fortran/33197
gcc/fortran/
* intrinsic.c (add_functions): Modify intrinsics ACOSH, ASINH,
ATANH, ERF, ERFC and GAMMA. Add intrinsics BESSEL_{J,Y}{0,1,N},
ERFC_SCALED, LOG_GAMMA and HYPOT.
* intrinsic.h (gfc_check_hypot, gfc_simplify_hypot,
gfc_resolve_hypot): New prototypes.
* mathbuiltins.def: Add HYPOT builtin. Make complex versions of
ACOSH, ASINH and ATANH available.
* gfortran.h (GFC_ISYM_ERFC_SCALED, GFC_ISYM_HYPOT): New values.
* lang.opt: Add -std=f2008 option.
* libgfortran.h: Define GFC_STD_F2008.
* lang-specs.h: Add .f08 and .F08 file suffixes.
* iresolve.c (gfc_resolve_hypot): New function.
* parse.c (parse_contained): Allow empty CONTAINS for Fortran 2008.
* check.c (gfc_check_hypot): New function.
* trans-intrinsic.c (gfc_intrinsic_map): Define ERFC_SCALE builtin.
* options.c (set_default_std_flags): Allow Fortran 2008 by default.
(form_from_filename): Add .f08 suffix.
(gfc_handle_option): Handle -std=f2008 option.
* simplify.c (gfc_simplify_hypot): New function.
* gfortran.texi: Document Fortran 2008 status and file extensions.
* intrinsic.texi: Document new BESSEL_{J,Y}{0,1,N} intrinsics,
as well as HYPOT and ERFC_SCALED. Update documentation of ERF,
ERFC, GAMMA, LGAMMA, ASINH, ACOSH and ATANH.
* invoke.texi: Document the new -std=f2008 option.
libgomp/
* testsuite/libgomp.fortran/fortran.exp: Add .f08 and
.F08 file suffixes.
gcc/testsuite/
* gfortran.dg/gomp/gomp.exp: Add .f08 and .F08 file suffixes.
* gfortran.dg/dg.exp: Likewise.
* gfortran.dg/vect/vect.exp: Likewise.
* gfortran.fortran-torture/execute/execute.exp: Likewise.
* gfortran.fortran-torture/compile/compile.exp: Likewise.
* gfortran.dg/gamma_1.f90: Also check log_gamma.
* gfortran.dg/invalid_contains_1.f90: Remove warning about
empty CONTAINS.
* gfortran.dg/gamma_2.f90: Add a few error messages.
* gfortran.dg/invalid_contains_2.f90: Remove warning about
empty CONTAINS.
* gfortran.dg/gamma_3.f90: Adjust error message.
* gfortran.dg/gamma_4.f90: Test for log_gamma instead of lgamma.
* gfortran.dg/bind_c_usage_9.f03: Adjust error messages.
* gfortran.dg/bessel_1.f90: New test.
* gfortran.dg/recursive_check_3.f90: Remove warnings.
* gfortran.dg/besxy.f90: Also check for new F2008 intrinsics.
* gfortran.dg/derived_function_interface_1.f90: Remove warning.
* gfortran.dg/contains_empty_1.f03: New test.
* gfortran.dg/erfc_scaled_1.f90: New test.
* gfortran.dg/hypot_1.f90: New test.
* gfortran.dg/contains_empty_2.f03: New test.
libgfortran/
* intrinsics/erfc_scaled_inc.c: New file.
* intrinsics/erfc_scaled.c: New file.
* gfortran.map (GFORTRAN_1.0): Add _gfortran_erfc_scaled_r*.
* Makefile.am: Add intrinsics/erfc_scaled.c.
* config.h.in: Regenerate.
* configure: Regenerate.
* Makefile.in: Regenerate.
From-SVN: r132846
2008-03-04 00:46:20 +01:00
|
|
|
* Makefile.am: Add -fcx-fortran-rules to AM_CFLAGS for all of
|
|
|
|
|
libgfortran.
|
|
|
|
|
* Makefile.in: Regenerated.
|
2008-02-25 20:27:28 +01:00
|
|
|
|
2008-02-25 13:02:56 +01:00
|
|
|
2008-02-25 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
* m4/ifunction_logical.m4: Add casts to get rid of warnings.
|
|
|
|
|
* generated/all_l1.c: Regenerate.
|
|
|
|
|
* generated/all_l2.c: Regenerate.
|
|
|
|
|
* generated/all_l4.c: Regenerate.
|
|
|
|
|
* generated/all_l8.c: Regenerate.
|
|
|
|
|
* generated/all_l16.c: Regenerate.
|
|
|
|
|
* generated/any_l1.c: Regenerate.
|
|
|
|
|
* generated/any_l2.c: Regenerate.
|
|
|
|
|
* generated/any_l4.c: Regenerate.
|
|
|
|
|
* generated/any_l8.c: Regenerate.
|
|
|
|
|
* generated/any_l16.c: Regenerate.
|
|
|
|
|
* generated/count_1_l.c: Regenerate.
|
|
|
|
|
* generated/count_2_l.c: Regenerate.
|
|
|
|
|
* generated/count_4_l.c: Regenerate.
|
|
|
|
|
* generated/count_8_l.c: Regenerate.
|
|
|
|
|
* generated/count_16_l.c: Regenerate.
|
|
|
|
|
|
2008-02-24 12:59:09 +01:00
|
|
|
2008-02-24 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/32841
|
|
|
|
|
* acinclude.m4: Don't use HAVE_MATH_H.
|
|
|
|
|
* configure: Regenerate.
|
|
|
|
|
|
2008-02-21 03:27:07 +01:00
|
|
|
2008-02-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/35132
|
|
|
|
|
* io/transfer.c (next_record_w): Truncate after the last record for
|
|
|
|
|
STREAM I/O.
|
|
|
|
|
|
|
|
|
|
PR libfortran/34954
|
|
|
|
|
* io/transfer.c (data_transfer_init): Initialize dtp->rec if writing.
|
|
|
|
|
|
|
|
|
|
PR libfortran/34974
|
|
|
|
|
* io/transfer.c (formatted_transfer_scalar): Flush the buffer if skips
|
|
|
|
|
is less than zero. (next_record_w): Use sseek to position the file to
|
|
|
|
|
the max position reached.
|
|
|
|
|
|
2008-02-21 03:20:27 +01:00
|
|
|
2008-02-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/35036
|
|
|
|
|
* write_float.def (output_float): Add error checks for zero digits
|
|
|
|
|
after decimal point in E and D format specifiers.
|
|
|
|
|
|
2008-02-10 19:06:34 +01:00
|
|
|
2008-02-10 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/35063
|
|
|
|
|
* io/unit.c (destroy_unit_mutex): New function that uses
|
|
|
|
|
__gthread_mutex_destroy_function or pthread_mutex_destroy after
|
|
|
|
|
unlocking and before free_mem for final closure of I/O unit.
|
|
|
|
|
(delete_root): Use new function.
|
|
|
|
|
(free_internal_unit): Likewise.
|
|
|
|
|
(close_unit_1): Likewise.
|
|
|
|
|
|
2008-02-02 14:50:55 +01:00
|
|
|
2008-02-02 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/35001
|
|
|
|
|
* m4/shape.m4: Return 0 for extents <= 0.
|
|
|
|
|
* generated/shape_i4.c: Regenerated.
|
|
|
|
|
* generated/shape_i8.c: Regenerated.
|
|
|
|
|
* generated/shape_i16.c: Regenerated.
|
|
|
|
|
|
2008-01-28 20:02:47 +01:00
|
|
|
2008-01-27 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/34980
|
|
|
|
|
* m4/shape.m4: If return array is empty, return early.
|
|
|
|
|
* generated/shape_i4.c: Regenerated.
|
|
|
|
|
* generated/shape_i8.c: Regenerated.
|
|
|
|
|
* generated/shape_i16.c: Regenerated.
|
|
|
|
|
|
2008-01-26 16:22:59 +01:00
|
|
|
2008-01-26 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfofortran/34887
|
|
|
|
|
* io/transfer.c (next_record_w): Always move to the farthest
|
|
|
|
|
position when completing the record (also when we are
|
|
|
|
|
processing a slash edit descriptor).
|
|
|
|
|
|
2008-01-26 00:36:39 +01:00
|
|
|
2008-01-25 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
2008-01-26 00:34:53 +01:00
|
|
|
|
|
|
|
|
PR libfortran/34876
|
|
|
|
|
* io/transfer.c (write_buf): Handle case of zero sized array.
|
|
|
|
|
(transfer_array): Set data pointer to NULL and size to zero. Then
|
|
|
|
|
make a data transfer and return.
|
|
|
|
|
|
2008-01-24 17:29:16 +01:00
|
|
|
2008-01-24 David Edelsohn <edelsohn@gnu.org>
|
|
|
|
|
|
|
|
|
|
* configure: Regenerate.
|
|
|
|
|
|
2008-01-20 07:33:49 +01:00
|
|
|
2008-01-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
2008-01-20 07:55:46 +01:00
|
|
|
PR libfortran/34795
|
2008-01-20 07:33:49 +01:00
|
|
|
* io/inquire.c (inquire_via_unit): If a unit is opened, return values
|
|
|
|
|
according to the open action for DIRECT, FORMATTED, and UNFORMATTED.
|
|
|
|
|
(inquire_via_filename): Return "UNKNOWN" for SEQUENTIAL, DIRECT,
|
|
|
|
|
FORAMATTED, and UNFORMATTED inquiries.
|
|
|
|
|
* io/unix.c (inquire_sequential): Return "UNKNOWN" when appropriate
|
|
|
|
|
for files that are not opened. (inquire_direct): Same.
|
|
|
|
|
(inquire_formatted): Same.
|
|
|
|
|
|
2008-01-18 23:19:15 +01:00
|
|
|
2008-01-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
2008-01-20 07:55:46 +01:00
|
|
|
PR libfortran/34782
|
2008-01-18 23:19:15 +01:00
|
|
|
* io/transfer.c (formatted_transfer_scalar): Set max_pos to the greater
|
|
|
|
|
of the current max_pos or the newly calculated position.
|
|
|
|
|
|
2008-01-18 22:43:08 +01:00
|
|
|
2008-01-18 Tobias Burnus <burnus@net-b.de>
|
|
|
|
|
|
|
|
|
|
* io/write.c (write_real): Increase default precision
|
|
|
|
|
for REAL(16) by one.
|
|
|
|
|
|
2008-01-16 10:13:39 +01:00
|
|
|
2008-01-16 Steven Bosscher <steven@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/34669
|
|
|
|
|
* mk-kinds-h.sh: Compile with -S to avoid calling the assembler,
|
|
|
|
|
to avoid piping the -fdump-parse-tree output to the assembler
|
|
|
|
|
when configuring with -pipe.
|
|
|
|
|
* mk-sik-inc.sh: Likewise.
|
|
|
|
|
* mk-srk-inc.sh: Likewise.
|
|
|
|
|
|
re PR libfortran/34671 (any(kind=1) and all(kind=1))
2008-01-15 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/34671
* gfortran.am: Added _gfortran_all_l1, _gfortran_all_l2,
_gfortran_any_l1, _gfortran_any_l2, -28,15 _gfortran_count_1_l,
_gfortran_count_16_l, _gfortran_count_2_l, _gfortran_count_4_l and
_gfortran_count_8_l Removed _gfortran_count_16_l16,
_gfortran_count_16_l4, _gfortran_count_16_l8,
_gfortran_count_4_l16, _gfortran_count_4_l4, _gfortran_count_4_l8,
_gfortran_count_8_l16, _gfortran_count_8_l4 and
_gfortran_count_8_l8.
* Makefile.am: Added generated/any_l1.c and generated/any_l2.c to
i_any_c. Added generated/all_l1. and generated/all_l2.c to
i_all_c. Removed generated/count_4_l4.c, generated/count_8_l4.c,
generated/count_16_l4.c, generated/count_4_l8.c,
generated/count_8_l8.c, generated/count_16_l8.c,
generated/count_4_l16.c, generated/count_8_l16.c, and
generated/count_16_l16.c from i_count_c. Added count_1_l.c,
count_2_l.c, count_4_l.c, count_8_l.c and count_16_l.c to
i_count_c. I_M4_DEPS2 depends on ifunction_logical.m4, for
any of the files generated from all.m4, any.m4 and count.m4.
* Makefile.in: Regenerated.
* m4/ifunction_logical.m4: New file. Use
GFC_LOGICAL_1 pointer for access to source arrays.
* m4/any.m4: Include ifunction_logical.m4 instead of
ifunction.m4. Don't check atype_name.
* m4/all.m4: Likewise.
* m4/count.m4: Likewise.
* generated/any_l1.c: New file.
* generated/any_l2.c: New file.
* generated/all_l1.c: New file.
* generated/count_1_l.c: New file.
* generated/count_2_l.c: New file.
* generated/count_4_l.c: New file.
* generated/count_8_l.c: New file.
* generated/count_16_l.c: New file.
* generated/any_l4.c: Regenerated.
* generated/any_l8.c: Regenerated.
* generated/any_l16.c: Regenerated.
* generated/all_l4.c: Regenerated.
* generated/all_l8.c: Regenerated.
* generated/all_l16.c: Regenerated.
* generated/count_4_l4.c: Removed.
* generated/count_4_l8.c: Removed.
* generated/count_4_l16.c: Removed.
* generated/count_8_l4.c: Removed.
* generated/count_8_l8.c: Removed.
* generated/count_8_l16.c: Removed.
* generated/count_16_l4.c: Removed.
* generated/count_16_l8.c: Removed.
* generated/count_16_l16.c: Removed.
2008-01-15 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/34671
* iresolve.c (gfc_resolve_all): Call resolve_mask_arg.
(gfc_resolve_any): Likewise.
(gfc_resolve_count): Likewise. Don't append kind of
argument to function name.
2008-01-15 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/34671
* gfortran.dg/anyallcount_1.f90: New test.
From-SVN: r131553
2008-01-15 22:22:07 +01:00
|
|
|
2008-01-15 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/34671
|
|
|
|
|
* gfortran.am: Added _gfortran_all_l1, _gfortran_all_l2,
|
|
|
|
|
_gfortran_any_l1, _gfortran_any_l2, -28,15 _gfortran_count_1_l,
|
|
|
|
|
_gfortran_count_16_l, _gfortran_count_2_l, _gfortran_count_4_l and
|
|
|
|
|
_gfortran_count_8_l Removed _gfortran_count_16_l16,
|
|
|
|
|
_gfortran_count_16_l4, _gfortran_count_16_l8,
|
|
|
|
|
_gfortran_count_4_l16, _gfortran_count_4_l4, _gfortran_count_4_l8,
|
|
|
|
|
_gfortran_count_8_l16, _gfortran_count_8_l4 and
|
|
|
|
|
_gfortran_count_8_l8.
|
|
|
|
|
* Makefile.am: Added generated/any_l1.c and generated/any_l2.c to
|
|
|
|
|
i_any_c. Added generated/all_l1. and generated/all_l2.c to
|
|
|
|
|
i_all_c. Removed generated/count_4_l4.c, generated/count_8_l4.c,
|
|
|
|
|
generated/count_16_l4.c, generated/count_4_l8.c,
|
|
|
|
|
generated/count_8_l8.c, generated/count_16_l8.c,
|
|
|
|
|
generated/count_4_l16.c, generated/count_8_l16.c, and
|
|
|
|
|
generated/count_16_l16.c from i_count_c. Added count_1_l.c,
|
|
|
|
|
count_2_l.c, count_4_l.c, count_8_l.c and count_16_l.c to
|
|
|
|
|
i_count_c. I_M4_DEPS2 depends on ifunction_logical.m4, for
|
|
|
|
|
any of the files generated from all.m4, any.m4 and count.m4.
|
|
|
|
|
* Makefile.in: Regenerated.
|
|
|
|
|
* m4/ifunction_logical.m4: New file. Use
|
|
|
|
|
GFC_LOGICAL_1 pointer for access to source arrays.
|
|
|
|
|
* m4/any.m4: Include ifunction_logical.m4 instead of
|
|
|
|
|
ifunction.m4. Don't check atype_name.
|
|
|
|
|
* m4/all.m4: Likewise.
|
|
|
|
|
* m4/count.m4: Likewise.
|
|
|
|
|
* generated/any_l1.c: New file.
|
|
|
|
|
* generated/any_l2.c: New file.
|
|
|
|
|
* generated/all_l1.c: New file.
|
|
|
|
|
* generated/count_1_l.c: New file.
|
|
|
|
|
* generated/count_2_l.c: New file.
|
|
|
|
|
* generated/count_4_l.c: New file.
|
|
|
|
|
* generated/count_8_l.c: New file.
|
|
|
|
|
* generated/count_16_l.c: New file.
|
|
|
|
|
* generated/any_l4.c: Regenerated.
|
|
|
|
|
* generated/any_l8.c: Regenerated.
|
|
|
|
|
* generated/any_l16.c: Regenerated.
|
|
|
|
|
* generated/all_l4.c: Regenerated.
|
|
|
|
|
* generated/all_l8.c: Regenerated.
|
|
|
|
|
* generated/all_l16.c: Regenerated.
|
|
|
|
|
* generated/count_4_l4.c: Removed.
|
|
|
|
|
* generated/count_4_l8.c: Removed.
|
|
|
|
|
* generated/count_4_l16.c: Removed.
|
|
|
|
|
* generated/count_8_l4.c: Removed.
|
|
|
|
|
* generated/count_8_l8.c: Removed.
|
|
|
|
|
* generated/count_8_l16.c: Removed.
|
|
|
|
|
* generated/count_16_l4.c: Removed.
|
|
|
|
|
* generated/count_16_l8.c: Removed.
|
|
|
|
|
* generated/count_16_l16.c: Removed.
|
|
|
|
|
|
2008-01-13 23:13:52 +01:00
|
|
|
2008-01-13 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/34746
|
|
|
|
|
* m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Use %ld
|
|
|
|
|
in printf format for all bounds checking; cast all
|
|
|
|
|
integer-like arguments to runtime_error() to long int.
|
|
|
|
|
(`m'name`'rtype_qual`_'atype_code): Likewise.
|
|
|
|
|
(`s'name`'rtype_qual`_'atype_code): Likewise.
|
|
|
|
|
* m4/ifunction.m4 (name`'rtype_qual`_'atype_code): Likewise.
|
|
|
|
|
(`m'name`'rtype_qual`_'atype_code): Likewise.
|
|
|
|
|
(`s'name`'rtype_qual`_'atype_code): Likewise.
|
|
|
|
|
* generated/all_l16.c: Regenerated.
|
|
|
|
|
* generated/all_l4.c: Regenerated.
|
|
|
|
|
* generated/all_l8.c: Regenerated.
|
|
|
|
|
* generated/any_l16.c: Regenerated.
|
|
|
|
|
* generated/any_l4.c: Regenerated.
|
|
|
|
|
* generated/any_l8.c: Regenerated.
|
|
|
|
|
* generated/count_16_l16.c: Regenerated.
|
|
|
|
|
* generated/count_16_l4.c: Regenerated.
|
|
|
|
|
* generated/count_16_l8.c: Regenerated.
|
|
|
|
|
* generated/count_4_l16.c: Regenerated.
|
|
|
|
|
* generated/count_4_l4.c: Regenerated.
|
|
|
|
|
* generated/count_4_l8.c: Regenerated.
|
|
|
|
|
* generated/count_8_l16.c: Regenerated.
|
|
|
|
|
* generated/count_8_l4.c: Regenerated.
|
|
|
|
|
* generated/count_8_l8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r8.c: Regenerated.
|
|
|
|
|
* generated/maxval_i1.c: Regenerated.
|
|
|
|
|
* generated/maxval_i16.c: Regenerated.
|
|
|
|
|
* generated/maxval_i2.c: Regenerated.
|
|
|
|
|
* generated/maxval_i4.c: Regenerated.
|
|
|
|
|
* generated/maxval_i8.c: Regenerated.
|
|
|
|
|
* generated/maxval_r10.c: Regenerated.
|
|
|
|
|
* generated/maxval_r16.c: Regenerated.
|
|
|
|
|
* generated/maxval_r4.c: Regenerated.
|
|
|
|
|
* generated/maxval_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r8.c: Regenerated.
|
|
|
|
|
* generated/minval_i1.c: Regenerated.
|
|
|
|
|
* generated/minval_i16.c: Regenerated.
|
|
|
|
|
* generated/minval_i2.c: Regenerated.
|
|
|
|
|
* generated/minval_i4.c: Regenerated.
|
|
|
|
|
* generated/minval_i8.c: Regenerated.
|
|
|
|
|
* generated/minval_r10.c: Regenerated.
|
|
|
|
|
* generated/minval_r16.c: Regenerated.
|
|
|
|
|
* generated/minval_r4.c: Regenerated.
|
|
|
|
|
* generated/minval_r8.c: Regenerated.
|
|
|
|
|
* generated/product_c10.c: Regenerated.
|
|
|
|
|
* generated/product_c16.c: Regenerated.
|
|
|
|
|
* generated/product_c4.c: Regenerated.
|
|
|
|
|
* generated/product_c8.c: Regenerated.
|
|
|
|
|
* generated/product_i1.c: Regenerated.
|
|
|
|
|
* generated/product_i16.c: Regenerated.
|
|
|
|
|
* generated/product_i2.c: Regenerated.
|
|
|
|
|
* generated/product_i4.c: Regenerated.
|
|
|
|
|
* generated/product_i8.c: Regenerated.
|
|
|
|
|
* generated/product_r10.c: Regenerated.
|
|
|
|
|
* generated/product_r16.c: Regenerated.
|
|
|
|
|
* generated/product_r4.c: Regenerated.
|
|
|
|
|
* generated/product_r8.c: Regenerated.
|
|
|
|
|
* generated/sum_c10.c: Regenerated.
|
|
|
|
|
* generated/sum_c16.c: Regenerated.
|
|
|
|
|
* generated/sum_c4.c: Regenerated.
|
|
|
|
|
* generated/sum_c8.c: Regenerated.
|
|
|
|
|
* generated/sum_i1.c: Regenerated.
|
|
|
|
|
* generated/sum_i16.c: Regenerated.
|
|
|
|
|
* generated/sum_i2.c: Regenerated.
|
|
|
|
|
* generated/sum_i4.c: Regenerated.
|
|
|
|
|
* generated/sum_i8.c: Regenerated.
|
|
|
|
|
* generated/sum_r10.c: Regenerated.
|
|
|
|
|
* generated/sum_r16.c: Regenerated.
|
|
|
|
|
* generated/sum_r4.c: Regenerated.
|
|
|
|
|
* generated/sum_r8.c: Regenerated.
|
|
|
|
|
|
2008-01-11 21:21:05 +01:00
|
|
|
2008-01-11 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/34670
|
|
|
|
|
* m4/iparm.m4 (upcase): New macro (copied from the m4 manual).
|
|
|
|
|
(u_name): New macro for the upper case name of the intrinsic.
|
|
|
|
|
* m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Add
|
|
|
|
|
bounds checking and rank check, depending on
|
|
|
|
|
compile_options.bounds_check.
|
|
|
|
|
(`m'name`'rtype_qual`_'atype_code): Likewise.
|
|
|
|
|
(`s'name`'rtype_qual`_'atype_code): Likewise.
|
|
|
|
|
* m4/ifunction.m4 (name`'rtype_qual`_'atype_code): Add
|
|
|
|
|
bounds checking and rank check, depending on
|
|
|
|
|
compile_options.bounds_check.
|
|
|
|
|
(`m'name`'rtype_qual`_'atype_code): Likewise.
|
|
|
|
|
(`s'name`'rtype_qual`_'atype_code): Likewise.
|
|
|
|
|
* generated/all_l16.c: Regenerated.
|
|
|
|
|
* generated/all_l4.c: Regenerated.
|
|
|
|
|
* generated/all_l8.c: Regenerated.
|
|
|
|
|
* generated/any_l16.c: Regenerated.
|
|
|
|
|
* generated/any_l4.c: Regenerated.
|
|
|
|
|
* generated/any_l8.c: Regenerated.
|
|
|
|
|
* generated/count_16_l16.c: Regenerated.
|
|
|
|
|
* generated/count_16_l4.c: Regenerated.
|
|
|
|
|
* generated/count_16_l8.c: Regenerated.
|
|
|
|
|
* generated/count_4_l16.c: Regenerated.
|
|
|
|
|
* generated/count_4_l4.c: Regenerated.
|
|
|
|
|
* generated/count_4_l8.c: Regenerated.
|
|
|
|
|
* generated/count_8_l16.c: Regenerated.
|
|
|
|
|
* generated/count_8_l4.c: Regenerated.
|
|
|
|
|
* generated/count_8_l8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r8.c: Regenerated.
|
|
|
|
|
* generated/maxval_i1.c: Regenerated.
|
|
|
|
|
* generated/maxval_i16.c: Regenerated.
|
|
|
|
|
* generated/maxval_i2.c: Regenerated.
|
|
|
|
|
* generated/maxval_i4.c: Regenerated.
|
|
|
|
|
* generated/maxval_i8.c: Regenerated.
|
|
|
|
|
* generated/maxval_r10.c: Regenerated.
|
|
|
|
|
* generated/maxval_r16.c: Regenerated.
|
|
|
|
|
* generated/maxval_r4.c: Regenerated.
|
|
|
|
|
* generated/maxval_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r8.c: Regenerated.
|
|
|
|
|
* generated/minval_i1.c: Regenerated.
|
|
|
|
|
* generated/minval_i16.c: Regenerated.
|
|
|
|
|
* generated/minval_i2.c: Regenerated.
|
|
|
|
|
* generated/minval_i4.c: Regenerated.
|
|
|
|
|
* generated/minval_i8.c: Regenerated.
|
|
|
|
|
* generated/minval_r10.c: Regenerated.
|
|
|
|
|
* generated/minval_r16.c: Regenerated.
|
|
|
|
|
* generated/minval_r4.c: Regenerated.
|
|
|
|
|
* generated/minval_r8.c: Regenerated.
|
|
|
|
|
* generated/product_c10.c: Regenerated.
|
|
|
|
|
* generated/product_c16.c: Regenerated.
|
|
|
|
|
* generated/product_c4.c: Regenerated.
|
|
|
|
|
* generated/product_c8.c: Regenerated.
|
|
|
|
|
* generated/product_i1.c: Regenerated.
|
|
|
|
|
* generated/product_i16.c: Regenerated.
|
|
|
|
|
* generated/product_i2.c: Regenerated.
|
|
|
|
|
* generated/product_i4.c: Regenerated.
|
|
|
|
|
* generated/product_i8.c: Regenerated.
|
|
|
|
|
* generated/product_r10.c: Regenerated.
|
|
|
|
|
* generated/product_r16.c: Regenerated.
|
|
|
|
|
* generated/product_r4.c: Regenerated.
|
|
|
|
|
* generated/product_r8.c: Regenerated.
|
|
|
|
|
* generated/sum_c10.c: Regenerated.
|
|
|
|
|
* generated/sum_c16.c: Regenerated.
|
|
|
|
|
* generated/sum_c4.c: Regenerated.
|
|
|
|
|
* generated/sum_c8.c: Regenerated.
|
|
|
|
|
* generated/sum_i1.c: Regenerated.
|
|
|
|
|
* generated/sum_i16.c: Regenerated.
|
|
|
|
|
* generated/sum_i2.c: Regenerated.
|
|
|
|
|
* generated/sum_i4.c: Regenerated.
|
|
|
|
|
* generated/sum_i8.c: Regenerated.
|
|
|
|
|
* generated/sum_r10.c: Regenerated.
|
|
|
|
|
* generated/sum_r16.c: Regenerated.
|
|
|
|
|
* generated/sum_r4.c: Regenerated.
|
|
|
|
|
* generated/sum_r8.c: Regenerated.
|
|
|
|
|
|
2008-01-05 17:00:40 +01:00
|
|
|
2008-01-05 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/34676
|
|
|
|
|
* io/list_read.c (next_char): Only save the EOF condition for later if
|
|
|
|
|
advance="no".
|
|
|
|
|
|
2008-01-03 20:49:38 +01:00
|
|
|
2008-01-03 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/34565
|
|
|
|
|
* io/io.h: Adjust protoypes for open_internal(),
|
|
|
|
|
next_array_record() and init_loop_spec().
|
|
|
|
|
* io/list_read.c (next_char): Use argument "finished"
|
|
|
|
|
of next_array_record to check for end on internal file.
|
|
|
|
|
* io/unit.c: Calculate the offset for an array
|
|
|
|
|
internal file and supply this informatin to open_internal().
|
|
|
|
|
* io/unix.c (open_internal): Set the offset for the internal
|
|
|
|
|
file on open.
|
|
|
|
|
* io/transfer.c (init_loop_spec): Calculate the starting
|
|
|
|
|
record in case of negative strides. Return size of 0 for
|
|
|
|
|
an empty array.
|
|
|
|
|
(next_array_record): Use an extra flag to signal that the
|
|
|
|
|
array is finished.
|
|
|
|
|
(next_record_r): Use the new flag to next_array_record().
|
|
|
|
|
(next_record_w): Likewise.
|