f4c0f88881
With multiple threads, using an unprotected static variable to check whether recursion has occured isn't valid, as one thread might have modified the variable, thus causing another thread to incorrectly conclude that recursion has occured. This patch avoids this problem by using a thread-specific variable for the recursion check. Regtested on x86_64-pc-linux-gnu. libgfortran/ChangeLog: 2018-11-23 Janne Blomqvist <jb@gcc.gnu.org> * runtime/error.c (MAGIC): Remove. (recursion_key): New variable. (recursion_check): Use thread-specific variable for recursion check if threads are active. (constructor_recursion_check): New function. (destructor_recursion_check): New funcion. From-SVN: r266419
1997 lines
76 KiB
Plaintext
1997 lines
76 KiB
Plaintext
2018-11-23 Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
* runtime/error.c (MAGIC): Remove.
|
||
(recursion_key): New variable.
|
||
(recursion_check): Use thread-specific variable for recursion
|
||
check if threads are active.
|
||
(constructor_recursion_check): New function.
|
||
(destructor_recursion_check): New funcion.
|
||
|
||
2018-11-22 Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
* acinclude.m4 (LIBGFOR_CHECK_ATOMIC_FETCH_ADD): Rename and test
|
||
presence of atomic builtins instead of sync builtins.
|
||
* configure.ac (LIBGFOR_CHECK_ATOMIC_FETCH_ADD): Call new test.
|
||
* io/io.h (inc_waiting_locked): Use __atomic_fetch_add.
|
||
(predec_waiting_locked): Use __atomic_add_fetch.
|
||
(dec_waiting_unlocked): Use __atomic_fetch_add.
|
||
* config.h.in: Regenerated.
|
||
* configure: Regenerated.
|
||
* Makefile.in: Regenerated.
|
||
|
||
2018-11-09 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
|
||
PR libfortran/78351
|
||
* io/transfer.c (read_sf_internal): Delete leftover
|
||
debug code.
|
||
|
||
2018-11-08 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
|
||
PR libfortran/78351
|
||
* io/transfer.c (read_sf_internal): Add support for early
|
||
comma termination of internal unit formatted reads.
|
||
|
||
2018-10-31 Joseph Myers <joseph@codesourcery.com>
|
||
|
||
PR bootstrap/82856
|
||
* Makefile.am: Include multilib.am.
|
||
* configure.ac: Remove AC_PREREQ.
|
||
* Makefile.in, aclocal.m4, config.h.in, configure: Regenerate.
|
||
|
||
2017-10-28 Thomas Koenig <tkoenig@gcc.gnu.org>
|
||
|
||
PR fortran/54613
|
||
* Makefile.am: Add files for findloc.
|
||
* Makefile.in: Regenerated.
|
||
* libgfortran.h (gfc_array_index_type): Add.
|
||
(gfc_array_s1): Add using GFC_UINTEGER_1.
|
||
(gfc_array_s4): Likewise.
|
||
Replace unnecessary comment.
|
||
(HAVE_GFC_UINTEGER_1): Define.
|
||
(HAVE_GFC_UINTEGER_4): Define.
|
||
* m4/findloc0.m4: New file.
|
||
* m4/findloc0s.m4: New file.
|
||
* m4/findloc1.m4: New file.
|
||
* m4/findloc1s.m4: New file.
|
||
* m4/findloc2s.m4: New file.
|
||
* m4/ifindloc0.m4: New file.
|
||
* m4/ifindloc1.m4: New file.
|
||
* m4/ifindloc2.m4: New file.
|
||
* m4/iparm.m4: Use unsigned integer for characters.
|
||
* generated/findloc0_c16.c: New file.
|
||
* generated/findloc0_c4.c: New file.
|
||
* generated/findloc0_c8.c: New file.
|
||
* generated/findloc0_i1.c: New file.
|
||
* generated/findloc0_i16.c: New file.
|
||
* generated/findloc0_i2.c: New file.
|
||
* generated/findloc0_i4.c: New file.
|
||
* generated/findloc0_i8.c: New file.
|
||
* generated/findloc0_r16.c: New file.
|
||
* generated/findloc0_r4.c: New file.
|
||
* generated/findloc0_r8.c: New file.
|
||
* generated/findloc0_s1.c: New file.
|
||
* generated/findloc0_s4.c: New file.
|
||
* generated/findloc1_c16.c: New file.
|
||
* generated/findloc1_c4.c: New file.
|
||
* generated/findloc1_c8.c: New file.
|
||
* generated/findloc1_i1.c: New file.
|
||
* generated/findloc1_i16.c: New file.
|
||
* generated/findloc1_i2.c: New file.
|
||
* generated/findloc1_i4.c: New file.
|
||
* generated/findloc1_i8.c: New file.
|
||
* generated/findloc1_r16.c: New file.
|
||
* generated/findloc1_r4.c: New file.
|
||
* generated/findloc1_r8.c: New file.
|
||
* generated/findloc1_s1.c: New file.
|
||
* generated/findloc1_s4.c: New file.
|
||
* generated/findloc2_s1.c: New file.
|
||
* generated/findloc2_s4.c: New file.
|
||
* generated/maxloc0_16_s1.c: Regenerated.
|
||
* generated/maxloc0_16_s4.c: Regenerated.
|
||
* generated/maxloc0_4_s1.c: Regenerated.
|
||
* generated/maxloc0_4_s4.c: Regenerated.
|
||
* generated/maxloc0_8_s1.c: Regenerated.
|
||
* generated/maxloc0_8_s4.c: Regenerated.
|
||
* generated/maxloc1_16_s1.c: Regenerated.
|
||
* generated/maxloc1_16_s4.c: Regenerated.
|
||
* generated/maxloc1_4_s1.c: Regenerated.
|
||
* generated/maxloc1_4_s4.c: Regenerated.
|
||
* generated/maxloc1_8_s1.c: Regenerated.
|
||
* generated/maxloc1_8_s4.c: Regenerated.
|
||
* generated/maxloc2_16_s1.c: Regenerated.
|
||
* generated/maxloc2_16_s4.c: Regenerated.
|
||
* generated/maxloc2_4_s1.c: Regenerated.
|
||
* generated/maxloc2_4_s4.c: Regenerated.
|
||
* generated/maxloc2_8_s1.c: Regenerated.
|
||
* generated/maxloc2_8_s4.c: Regenerated.
|
||
* generated/maxval0_s1.c: Regenerated.
|
||
* generated/maxval0_s4.c: Regenerated.
|
||
* generated/maxval1_s1.c: Regenerated.
|
||
* generated/maxval1_s4.c: Regenerated.
|
||
* generated/minloc0_16_s1.c: Regenerated.
|
||
* generated/minloc0_16_s4.c: Regenerated.
|
||
* generated/minloc0_4_s1.c: Regenerated.
|
||
* generated/minloc0_4_s4.c: Regenerated.
|
||
* generated/minloc0_8_s1.c: Regenerated.
|
||
* generated/minloc0_8_s4.c: Regenerated.
|
||
* generated/minloc1_16_s1.c: Regenerated.
|
||
* generated/minloc1_16_s4.c: Regenerated.
|
||
* generated/minloc1_4_s1.c: Regenerated.
|
||
* generated/minloc1_4_s4.c: Regenerated.
|
||
* generated/minloc1_8_s1.c: Regenerated.
|
||
* generated/minloc1_8_s4.c: Regenerated.
|
||
* generated/minloc2_16_s1.c: Regenerated.
|
||
* generated/minloc2_16_s4.c: Regenerated.
|
||
* generated/minloc2_4_s1.c: Regenerated.
|
||
* generated/minloc2_4_s4.c: Regenerated.
|
||
* generated/minloc2_8_s1.c: Regenerated.
|
||
* generated/minloc2_8_s4.c: Regenerated.
|
||
* generated/minval0_s1.c: Regenerated.
|
||
* generated/minval0_s4.c: Regenerated.
|
||
* generated/minval1_s1.c: Regenerated.
|
||
* generated/minval1_s4.c: Regenerated.
|
||
|
||
2018-10-06 Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
* io/unix.c (compare_file_filename): Use gfc_charlen_type instead
|
||
of int for string length.
|
||
(inquire_sequential): Likewise.
|
||
(inquire_direct): Likewise.
|
||
(inquire_formatted): Likewise.
|
||
(inquire_unformatted): Likewise.
|
||
(inquire_access): Likewise.
|
||
(inquire_read): Likewise.
|
||
(inquire_write): Likewise.
|
||
(inquire_readwrite): Likewise.
|
||
* io/unix.h (compare_file_filename): Likewise.
|
||
(inquire_sequential): Likewise.
|
||
(inquire_direct): Likewise.
|
||
(inquire_formatted): Likewise.
|
||
(inquire_unformatted): Likewise.
|
||
(inquire_read): Likewise.
|
||
(inquire_write): Likewise.
|
||
(inquire_readwrite): Likewise.
|
||
|
||
2018-10-02 Gerald Pfeifer <gerald@pfeifer.com>
|
||
|
||
* io/close.c [!HAVE_UNLINK_OPEN_FILE]: Include <string.h>.
|
||
|
||
2018-09-21 Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
* config.h.in: Regenerated.
|
||
* configure: Regenerated.
|
||
* configure.ac: Check for writev and sys/uio.h.
|
||
* libgfortran.h: Include sys/uio.h.
|
||
(st_vprintf): Remove prototype.
|
||
(struct iovec): Define if not available.
|
||
(estr_writev): New prototype.
|
||
* runtime/backtrace.c (error_callback): Use estr_writev.
|
||
* runtime/error.c (ST_VPRINTF_SIZE): Remove.
|
||
(estr_writev): New function.
|
||
(st_vprintf): Remove.
|
||
(gf_vsnprintf): New function.
|
||
(ST_ERRBUF_SIZE): New macro.
|
||
(st_printf): Use vsnprintf.
|
||
(os_error): Use estr_writev.
|
||
(runtime_error): Use vsnprintf and estr_writev.
|
||
(runtime_error_at): Likewise.
|
||
(runtime_warning_at): Likewise.
|
||
(internal_error): Use estr_writev.
|
||
(generate_error_common): Likewise.
|
||
(generate_warning): Likewise.
|
||
(notify_std): Likewise.
|
||
* runtime/pause.c (pause_string): Likewise.
|
||
* runtime/stop.c (report_exception): Likewise.
|
||
(stop_string): Likewise.
|
||
(error_stop_string): Likewise.
|
||
|
||
2018-09-16 Thomas Koenig <tkoenig@gcc.gnu.org>
|
||
|
||
PR fortran/37802
|
||
* m4/matmul_internal.m4: Adjust error messages.
|
||
* generated/matmul_c10.c: Regenerated.
|
||
* generated/matmul_c16.c: Regenerated.
|
||
* generated/matmul_c4.c: Regenerated.
|
||
* generated/matmul_c8.c: Regenerated.
|
||
* generated/matmul_i1.c: Regenerated.
|
||
* generated/matmul_i16.c: Regenerated.
|
||
* generated/matmul_i2.c: Regenerated.
|
||
* generated/matmul_i4.c: Regenerated.
|
||
* generated/matmul_i8.c: Regenerated.
|
||
* generated/matmul_r10.c: Regenerated.
|
||
* generated/matmul_r16.c: Regenerated.
|
||
* generated/matmul_r4.c: Regenerated.
|
||
* generated/matmul_r8.c: Regenerated.
|
||
* generated/matmulavx128_c10.c: Regenerated.
|
||
* generated/matmulavx128_c16.c: Regenerated.
|
||
* generated/matmulavx128_c4.c: Regenerated.
|
||
* generated/matmulavx128_c8.c: Regenerated.
|
||
* generated/matmulavx128_i1.c: Regenerated.
|
||
* generated/matmulavx128_i16.c: Regenerated.
|
||
* generated/matmulavx128_i2.c: Regenerated.
|
||
* generated/matmulavx128_i4.c: Regenerated.
|
||
* generated/matmulavx128_i8.c: Regenerated.
|
||
* generated/matmulavx128_r10.c: Regenerated.
|
||
* generated/matmulavx128_r16.c: Regenerated.
|
||
* generated/matmulavx128_r4.c: Regenerated.
|
||
* generated/matmulavx128_r8.c: Regenerated.
|
||
|
||
2018-09-14 Kyrylo Tkachov <kyrylo.tkachov@arm.com>
|
||
|
||
* io/unix.c (fallback_access): Avoid calling close on
|
||
uninitialized file descriptor.
|
||
|
||
2018-09-12 Kwok Cheung Yeung <kcy@codesourcery.com>
|
||
|
||
* runtime/minimal.c (estr_write): Define in terms of write.
|
||
|
||
2018-09-12 Andrew Stubbs <ams@codesourcery.com>
|
||
|
||
* runtime/minimal.c (exit): Only work around nvptx bugs on nvptx.
|
||
|
||
2018-09-07 Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
* runtime/environ.c (init_unsigned_integer): Remove.
|
||
|
||
2018-09-05 Hans-Peter Nilsson <hp@axis.com>
|
||
|
||
* io/async.h: Use __gthread_mutex_t, not pthread_mutex_t.
|
||
|
||
2018-09-01 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
|
||
* io/io.h: Change declaration of vlist type to
|
||
gfc_full_array_i4 to eliminate warning for mismatched type.
|
||
* io/format.c ((parse_format_list): Use gfc_full_array_i4.
|
||
* io/io.h: Use gfc_full_array_i4.
|
||
|
||
2018-08-25 Thomas Koenig <tkoenig@gcc.gnu.org>
|
||
|
||
PR libfortran/86704
|
||
* m4/matmul_internal.m4: Correct calculation of needed buffer size
|
||
for arrays of shape (1,n).
|
||
* generated/matmul_c10.c: Regenerated
|
||
* generated/matmul_c16.c: Regenerated
|
||
* generated/matmul_c4.c: Regenerated
|
||
* generated/matmul_c8.c: Regenerated
|
||
* generated/matmul_i1.c: Regenerated
|
||
* generated/matmul_i16.c: Regenerated
|
||
* generated/matmul_i2.c: Regenerated
|
||
* generated/matmul_i4.c: Regenerated
|
||
* generated/matmul_i8.c: Regenerated
|
||
* generated/matmul_r10.c: Regenerated
|
||
* generated/matmul_r16.c: Regenerated
|
||
* generated/matmul_r4.c: Regenerated
|
||
* generated/matmul_r8.c: Regenerated
|
||
* generated/matmulavx128_c10.c: Regenerated
|
||
* generated/matmulavx128_c16.c: Regenerated
|
||
* generated/matmulavx128_c4.c: Regenerated
|
||
* generated/matmulavx128_c8.c: Regenerated
|
||
* generated/matmulavx128_i1.c: Regenerated
|
||
* generated/matmulavx128_i16.c: Regenerated
|
||
* generated/matmulavx128_i2.c: Regenerated
|
||
* generated/matmulavx128_i4.c: Regenerated
|
||
* generated/matmulavx128_i8.c: Regenerated
|
||
* generated/matmulavx128_r10.c: Regenerated
|
||
* generated/matmulavx128_r16.c: Regenerated
|
||
* generated/matmulavx128_r4.c: Regenerated
|
||
* generated/matmulavx128_r8.c: Regenerated
|
||
|
||
2018-08-23 David Edelsohn <dje.gcc@gmail.com>
|
||
|
||
* async.h (ASYNC_IO): Revert _AIX test.
|
||
|
||
2018-08-22 Thomas Koenig <tkoenig@gcc.gnu.org>
|
||
|
||
* async.h: Set ASYNC_IO to zero if _AIX is defined.
|
||
(struct adv_cond): If ASYNC_IO is zero, the struct has no members.
|
||
(async_unit): If ASYNC_IO is zero, remove unneeded members.
|
||
|
||
2018-08-21 Nicolas Koenig <koenigni@gcc.gnu.org>
|
||
Thomas Koenig <tkoenig@gcc.gnu.org>
|
||
|
||
PR fortran/25829
|
||
* Makefile.am: Add async.c to gfor_io_src.
|
||
Add async.h to gfor_io_headers.
|
||
* Makefile.in: Regenerated.
|
||
* gfortran.map: Add _gfortran_st_wait_async.
|
||
* io/async.c: New file.
|
||
* io/async.h: New file.
|
||
* io/close.c: Include async.h.
|
||
(st_close): Call async_wait for an asynchronous unit.
|
||
* io/file_pos.c (st_backspace): Likewise.
|
||
(st_endfile): Likewise.
|
||
(st_rewind): Likewise.
|
||
(st_flush): Likewise.
|
||
* io/inquire.c: Add handling for asynchronous PENDING
|
||
and ID arguments.
|
||
* io/io.h (st_parameter_dt): Add async bit.
|
||
(st_parameter_wait): Correct.
|
||
(gfc_unit): Add au pointer.
|
||
(st_wait_async): Add prototype.
|
||
(transfer_array_inner): Likewise.
|
||
(st_write_done_worker): Likewise.
|
||
* io/open.c: Include async.h.
|
||
(new_unit): Initialize asynchronous unit.
|
||
* io/transfer.c (async_opt): New struct.
|
||
(wrap_scalar_transfer): New function.
|
||
(transfer_integer): Call wrap_scalar_transfer to do the work.
|
||
(transfer_real): Likewise.
|
||
(transfer_real_write): Likewise.
|
||
(transfer_character): Likewise.
|
||
(transfer_character_wide): Likewise.
|
||
(transfer_complex): Likewise.
|
||
(transfer_array_inner): New function.
|
||
(transfer_array): Call transfer_array_inner.
|
||
(transfer_derived): Call wrap_scalar_transfer.
|
||
(data_transfer_init): Check for asynchronous I/O.
|
||
Perform a wait operation on any pending asynchronous I/O
|
||
if the data transfer is synchronous. Copy PDT and enqueue
|
||
thread for data transfer.
|
||
(st_read_done_worker): New function.
|
||
(st_read_done): Enqueue transfer or call st_read_done_worker.
|
||
(st_write_done_worker): New function.
|
||
(st_write_done): Enqueue transfer or call st_read_done_worker.
|
||
(st_wait): Document as no-op for compatibility reasons.
|
||
(st_wait_async): New function.
|
||
* io/unit.c (insert_unit): Use macros LOCK, UNLOCK and TRYLOCK;
|
||
add NOTE where necessary.
|
||
(get_gfc_unit): Likewise.
|
||
(init_units): Likewise.
|
||
(close_unit_1): Likewise. Call async_close if asynchronous.
|
||
(close_unit): Use macros LOCK and UNLOCK.
|
||
(finish_last_advance_record): Likewise.
|
||
(newunit_alloc): Likewise.
|
||
* io/unix.c (find_file): Likewise.
|
||
(flush_all_units_1): Likewise.
|
||
(flush_all_units): Likewise.
|
||
* libgfortran.h (generate_error_common): Add prototype.
|
||
* runtime/error.c: Include io.h and async.h.
|
||
(generate_error_common): New function.
|
||
|
||
2018-08-15 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
|
||
|
||
* configure.ac: Check for <sys/random.h>.
|
||
* configure, config.h.in: Regenerate.
|
||
* intrinsics/random.c [HAVE_SYS_RANDOM_H]: Include <sys/random.h>.
|
||
|
||
2018-08-13 Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
* configure.ac: Check for getentropy.
|
||
* intrinsics/random.c (getosrandom): Use getentropy if available.
|
||
* config.h.in: Regenerated.
|
||
* configure: Regenerated.
|
||
|
||
2018-07-31 Andre Vieira <andre.simoesdiasvieira@arm.com>
|
||
|
||
Revert 'AsyncI/O patch committed'
|
||
2018-07-25 Nicolas Koenig <koenigni@gcc.gnu.org>
|
||
Thomas Koenig <tkoenig@gcc.gnu.org>
|
||
|
||
PR fortran/25829
|
||
* Makefile.am: Add async.c to gfor_io_src.
|
||
Add async.h to gfor_io_headers.
|
||
* Makefile.in: Regenerated.
|
||
* gfortran.map: Add _gfortran_st_wait_async.
|
||
* io/async.c: New file.
|
||
* io/async.h: New file.
|
||
* io/close.c: Include async.h.
|
||
(st_close): Call async_wait for an asynchronous unit.
|
||
* io/file_pos.c (st_backspace): Likewise.
|
||
(st_endfile): Likewise.
|
||
(st_rewind): Likewise.
|
||
(st_flush): Likewise.
|
||
* io/inquire.c: Add handling for asynchronous PENDING
|
||
and ID arguments.
|
||
* io/io.h (st_parameter_dt): Add async bit.
|
||
(st_parameter_wait): Correct.
|
||
(gfc_unit): Add au pointer.
|
||
(st_wait_async): Add prototype.
|
||
(transfer_array_inner): Likewise.
|
||
(st_write_done_worker): Likewise.
|
||
* io/open.c: Include async.h.
|
||
(new_unit): Initialize asynchronous unit.
|
||
* io/transfer.c (async_opt): New struct.
|
||
(wrap_scalar_transfer): New function.
|
||
(transfer_integer): Call wrap_scalar_transfer to do the work.
|
||
(transfer_real): Likewise.
|
||
(transfer_real_write): Likewise.
|
||
(transfer_character): Likewise.
|
||
(transfer_character_wide): Likewise.
|
||
(transfer_complex): Likewise.
|
||
(transfer_array_inner): New function.
|
||
(transfer_array): Call transfer_array_inner.
|
||
(transfer_derived): Call wrap_scalar_transfer.
|
||
(data_transfer_init): Check for asynchronous I/O.
|
||
Perform a wait operation on any pending asynchronous I/O
|
||
if the data transfer is synchronous. Copy PDT and enqueue
|
||
thread for data transfer.
|
||
(st_read_done_worker): New function.
|
||
(st_read_done): Enqueue transfer or call st_read_done_worker.
|
||
(st_write_done_worker): New function.
|
||
(st_write_done): Enqueue transfer or call st_read_done_worker.
|
||
(st_wait): Document as no-op for compatibility reasons.
|
||
(st_wait_async): New function.
|
||
* io/unit.c (insert_unit): Use macros LOCK, UNLOCK and TRYLOCK;
|
||
add NOTE where necessary.
|
||
(get_gfc_unit): Likewise.
|
||
(init_units): Likewise.
|
||
(close_unit_1): Likewise. Call async_close if asynchronous.
|
||
(close_unit): Use macros LOCK and UNLOCK.
|
||
(finish_last_advance_record): Likewise.
|
||
(newunit_alloc): Likewise.
|
||
* io/unix.c (find_file): Likewise.
|
||
(flush_all_units_1): Likewise.
|
||
(flush_all_units): Likewise.
|
||
* libgfortran.h (generate_error_common): Add prototype.
|
||
* runtime/error.c: Include io.h and async.h.
|
||
(generate_error_common): New function.
|
||
|
||
2018-07-25 Nicolas Koenig <koenigni@gcc.gnu.org>
|
||
Thomas Koenig <tkoenig@gcc.gnu.org>
|
||
|
||
PR fortran/25829
|
||
* Makefile.am: Add async.c to gfor_io_src.
|
||
Add async.h to gfor_io_headers.
|
||
* Makefile.in: Regenerated.
|
||
* gfortran.map: Add _gfortran_st_wait_async.
|
||
* io/async.c: New file.
|
||
* io/async.h: New file.
|
||
* io/close.c: Include async.h.
|
||
(st_close): Call async_wait for an asynchronous unit.
|
||
* io/file_pos.c (st_backspace): Likewise.
|
||
(st_endfile): Likewise.
|
||
(st_rewind): Likewise.
|
||
(st_flush): Likewise.
|
||
* io/inquire.c: Add handling for asynchronous PENDING
|
||
and ID arguments.
|
||
* io/io.h (st_parameter_dt): Add async bit.
|
||
(st_parameter_wait): Correct.
|
||
(gfc_unit): Add au pointer.
|
||
(st_wait_async): Add prototype.
|
||
(transfer_array_inner): Likewise.
|
||
(st_write_done_worker): Likewise.
|
||
* io/open.c: Include async.h.
|
||
(new_unit): Initialize asynchronous unit.
|
||
* io/transfer.c (async_opt): New struct.
|
||
(wrap_scalar_transfer): New function.
|
||
(transfer_integer): Call wrap_scalar_transfer to do the work.
|
||
(transfer_real): Likewise.
|
||
(transfer_real_write): Likewise.
|
||
(transfer_character): Likewise.
|
||
(transfer_character_wide): Likewise.
|
||
(transfer_complex): Likewise.
|
||
(transfer_array_inner): New function.
|
||
(transfer_array): Call transfer_array_inner.
|
||
(transfer_derived): Call wrap_scalar_transfer.
|
||
(data_transfer_init): Check for asynchronous I/O.
|
||
Perform a wait operation on any pending asynchronous I/O
|
||
if the data transfer is synchronous. Copy PDT and enqueue
|
||
thread for data transfer.
|
||
(st_read_done_worker): New function.
|
||
(st_read_done): Enqueue transfer or call st_read_done_worker.
|
||
(st_write_done_worker): New function.
|
||
(st_write_done): Enqueue transfer or call st_read_done_worker.
|
||
(st_wait): Document as no-op for compatibility reasons.
|
||
(st_wait_async): New function.
|
||
* io/unit.c (insert_unit): Use macros LOCK, UNLOCK and TRYLOCK;
|
||
add NOTE where necessary.
|
||
(get_gfc_unit): Likewise.
|
||
(init_units): Likewise.
|
||
(close_unit_1): Likewise. Call async_close if asynchronous.
|
||
(close_unit): Use macros LOCK and UNLOCK.
|
||
(finish_last_advance_record): Likewise.
|
||
(newunit_alloc): Likewise.
|
||
* io/unix.c (find_file): Likewise.
|
||
(flush_all_units_1): Likewise.
|
||
(flush_all_units): Likewise.
|
||
* libgfortran.h (generate_error_common): Add prototype.
|
||
* runtime/error.c: Include io.h and async.h.
|
||
(generate_error_common): New function.
|
||
|
||
2018-06-09 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
|
||
PR libgfortran/86070
|
||
* io/write_float.def (build_float_string): Initialize *len.
|
||
|
||
2018-06-01 Steven G. Kargl <kargl@gcc.gnu.org>
|
||
|
||
PR fortran/85816
|
||
PR fortran/85975
|
||
* libgfortran.h: Remove the GFC_DTYPE_COPY_SETRANK macro.
|
||
* intrinsics/reshape_generic.c: Directly assign rank.
|
||
* intrinsics/spread_generic.c: Ditto.
|
||
* m4/iforeach-s.m4: Ditto.
|
||
* m4/iforeach.m4: Ditto.
|
||
* m4/ifunction-s.m4: Ditto.
|
||
* m4/ifunction-s2.m4: Ditto.
|
||
* m4/ifunction.m4: Ditto.
|
||
* m4/ifunction_logical.m4: Ditto.
|
||
* m4/reshape.m4: Ditto.
|
||
* m4/spread.m4: Ditto.
|
||
* generated/all_l1.c: Regenerated from m4 files.
|
||
* generated/all_l16.c: Ditto.
|
||
* generated/all_l2.c: Ditto.
|
||
* generated/all_l4.c: Ditto.
|
||
* generated/all_l8.c: Ditto.
|
||
* generated/any_l1.c: Ditto.
|
||
* generated/any_l16.c: Ditto.
|
||
* generated/any_l2.c: Ditto.
|
||
* generated/any_l4.c: Ditto.
|
||
* generated/any_l8.c: Ditto.
|
||
* generated/count_16_l.c: Ditto.
|
||
* generated/count_1_l.c: Ditto.
|
||
* generated/count_2_l.c: Ditto.
|
||
* generated/count_4_l.c: Ditto.
|
||
* generated/count_8_l.c: Ditto.
|
||
* generated/iall_i1.c: Ditto.
|
||
* generated/iall_i16.c: Ditto.
|
||
* generated/iall_i2.c: Ditto.
|
||
* generated/iall_i4.c: Ditto.
|
||
* generated/iall_i8.c: Ditto.
|
||
* generated/iany_i1.c: Ditto.
|
||
* generated/iany_i16.c: Ditto.
|
||
* generated/iany_i2.c: Ditto.
|
||
* generated/iany_i4.c: Ditto.
|
||
* generated/iany_i8.c: Ditto.
|
||
* generated/iparity_i1.c: Ditto.
|
||
* generated/iparity_i16.c: Ditto.
|
||
* generated/iparity_i2.c: Ditto.
|
||
* generated/iparity_i4.c: Ditto.
|
||
* generated/iparity_i8.c: Ditto.
|
||
* generated/maxloc0_16_i1.c: Ditto.
|
||
* generated/maxloc0_16_i16.c: Ditto.
|
||
* generated/maxloc0_16_i2.c: Ditto.
|
||
* generated/maxloc0_16_i4.c: Ditto.
|
||
* generated/maxloc0_16_i8.c: Ditto.
|
||
* generated/maxloc0_16_r10.c: Ditto.
|
||
* generated/maxloc0_16_r16.c: Ditto.
|
||
* generated/maxloc0_16_r4.c: Ditto.
|
||
* generated/maxloc0_16_r8.c: Ditto.
|
||
* generated/maxloc0_16_s1.c: Ditto.
|
||
* generated/maxloc0_16_s4.c: Ditto.
|
||
* generated/maxloc0_4_i1.c: Ditto.
|
||
* generated/maxloc0_4_i16.c: Ditto.
|
||
* generated/maxloc0_4_i2.c: Ditto.
|
||
* generated/maxloc0_4_i4.c: Ditto.
|
||
* generated/maxloc0_4_i8.c: Ditto.
|
||
* generated/maxloc0_4_r10.c: Ditto.
|
||
* generated/maxloc0_4_r16.c: Ditto.
|
||
* generated/maxloc0_4_r4.c: Ditto.
|
||
* generated/maxloc0_4_r8.c: Ditto.
|
||
* generated/maxloc0_4_s1.c: Ditto.
|
||
* generated/maxloc0_4_s4.c: Ditto.
|
||
* generated/maxloc0_8_i1.c: Ditto.
|
||
* generated/maxloc0_8_i16.c: Ditto.
|
||
* generated/maxloc0_8_i2.c: Ditto.
|
||
* generated/maxloc0_8_i4.c: Ditto.
|
||
* generated/maxloc0_8_i8.c: Ditto.
|
||
* generated/maxloc0_8_r10.c: Ditto.
|
||
* generated/maxloc0_8_r16.c: Ditto.
|
||
* generated/maxloc0_8_r4.c: Ditto.
|
||
* generated/maxloc0_8_r8.c: Ditto.
|
||
* generated/maxloc0_8_s1.c: Ditto.
|
||
* generated/maxloc0_8_s4.c: Ditto.
|
||
* generated/maxloc1_16_i1.c: Ditto.
|
||
* generated/maxloc1_16_i16.c: Ditto.
|
||
* generated/maxloc1_16_i2.c: Ditto.
|
||
* generated/maxloc1_16_i4.c: Ditto.
|
||
* generated/maxloc1_16_i8.c: Ditto.
|
||
* generated/maxloc1_16_r10.c: Ditto.
|
||
* generated/maxloc1_16_r16.c: Ditto.
|
||
* generated/maxloc1_16_r4.c: Ditto.
|
||
* generated/maxloc1_16_r8.c: Ditto.
|
||
* generated/maxloc1_16_s1.c: Ditto.
|
||
* generated/maxloc1_16_s4.c: Ditto.
|
||
* generated/maxloc1_4_i1.c: Ditto.
|
||
* generated/maxloc1_4_i16.c: Ditto.
|
||
* generated/maxloc1_4_i2.c: Ditto.
|
||
* generated/maxloc1_4_i4.c: Ditto.
|
||
* generated/maxloc1_4_i8.c: Ditto.
|
||
* generated/maxloc1_4_r10.c: Ditto.
|
||
* generated/maxloc1_4_r16.c: Ditto.
|
||
* generated/maxloc1_4_r4.c: Ditto.
|
||
* generated/maxloc1_4_r8.c: Ditto.
|
||
* generated/maxloc1_4_s1.c: Ditto.
|
||
* generated/maxloc1_4_s4.c: Ditto.
|
||
* generated/maxloc1_8_i1.c: Ditto.
|
||
* generated/maxloc1_8_i16.c: Ditto.
|
||
* generated/maxloc1_8_i2.c: Ditto.
|
||
* generated/maxloc1_8_i4.c: Ditto.
|
||
* generated/maxloc1_8_i8.c: Ditto.
|
||
* generated/maxloc1_8_r10.c: Ditto.
|
||
* generated/maxloc1_8_r16.c: Ditto.
|
||
* generated/maxloc1_8_r4.c: Ditto.
|
||
* generated/maxloc1_8_r8.c: Ditto.
|
||
* generated/maxloc1_8_s1.c: Ditto.
|
||
* generated/maxloc1_8_s4.c: Ditto.
|
||
* generated/maxval1_s1.c: Ditto.
|
||
* generated/maxval1_s4.c: Ditto.
|
||
* generated/maxval_i1.c: Ditto.
|
||
* generated/maxval_i16.c: Ditto.
|
||
* generated/maxval_i2.c: Ditto.
|
||
* generated/maxval_i4.c: Ditto.
|
||
* generated/maxval_i8.c: Ditto.
|
||
* generated/maxval_r10.c: Ditto.
|
||
* generated/maxval_r16.c: Ditto.
|
||
* generated/maxval_r4.c: Ditto.
|
||
* generated/maxval_r8.c: Ditto.
|
||
* generated/minloc0_16_i1.c: Ditto.
|
||
* generated/minloc0_16_i16.c: Ditto.
|
||
* generated/minloc0_16_i2.c: Ditto.
|
||
* generated/minloc0_16_i4.c: Ditto.
|
||
* generated/minloc0_16_i8.c: Ditto.
|
||
* generated/minloc0_16_r10.c: Ditto.
|
||
* generated/minloc0_16_r16.c: Ditto.
|
||
* generated/minloc0_16_r4.c: Ditto.
|
||
* generated/minloc0_16_r8.c: Ditto.
|
||
* generated/minloc0_16_s1.c: Ditto.
|
||
* generated/minloc0_16_s4.c: Ditto.
|
||
* generated/minloc0_4_i1.c: Ditto.
|
||
* generated/minloc0_4_i16.c: Ditto.
|
||
* generated/minloc0_4_i2.c: Ditto.
|
||
* generated/minloc0_4_i4.c: Ditto.
|
||
* generated/minloc0_4_i8.c: Ditto.
|
||
* generated/minloc0_4_r10.c: Ditto.
|
||
* generated/minloc0_4_r16.c: Ditto.
|
||
* generated/minloc0_4_r4.c: Ditto.
|
||
* generated/minloc0_4_r8.c: Ditto.
|
||
* generated/minloc0_4_s1.c: Ditto.
|
||
* generated/minloc0_4_s4.c: Ditto.
|
||
* generated/minloc0_8_i1.c: Ditto.
|
||
* generated/minloc0_8_i16.c: Ditto.
|
||
* generated/minloc0_8_i2.c: Ditto.
|
||
* generated/minloc0_8_i4.c: Ditto.
|
||
* generated/minloc0_8_i8.c: Ditto.
|
||
* generated/minloc0_8_r10.c: Ditto.
|
||
* generated/minloc0_8_r16.c: Ditto.
|
||
* generated/minloc0_8_r4.c: Ditto.
|
||
* generated/minloc0_8_r8.c: Ditto.
|
||
* generated/minloc0_8_s1.c: Ditto.
|
||
* generated/minloc0_8_s4.c: Ditto.
|
||
* generated/minloc1_16_i1.c: Ditto.
|
||
* generated/minloc1_16_i16.c: Ditto.
|
||
* generated/minloc1_16_i2.c: Ditto.
|
||
* generated/minloc1_16_i4.c: Ditto.
|
||
* generated/minloc1_16_i8.c: Ditto.
|
||
* generated/minloc1_16_r10.c: Ditto.
|
||
* generated/minloc1_16_r16.c: Ditto.
|
||
* generated/minloc1_16_r4.c: Ditto.
|
||
* generated/minloc1_16_r8.c: Ditto.
|
||
* generated/minloc1_16_s1.c: Ditto.
|
||
* generated/minloc1_16_s4.c: Ditto.
|
||
* generated/minloc1_4_i1.c: Ditto.
|
||
* generated/minloc1_4_i16.c: Ditto.
|
||
* generated/minloc1_4_i2.c: Ditto.
|
||
* generated/minloc1_4_i4.c: Ditto.
|
||
* generated/minloc1_4_i8.c: Ditto.
|
||
* generated/minloc1_4_r10.c: Ditto.
|
||
* generated/minloc1_4_r16.c: Ditto.
|
||
* generated/minloc1_4_r4.c: Ditto.
|
||
* generated/minloc1_4_r8.c: Ditto.
|
||
* generated/minloc1_4_s1.c: Ditto.
|
||
* generated/minloc1_4_s4.c: Ditto.
|
||
* generated/minloc1_8_i1.c: Ditto.
|
||
* generated/minloc1_8_i16.c: Ditto.
|
||
* generated/minloc1_8_i2.c: Ditto.
|
||
* generated/minloc1_8_i4.c: Ditto.
|
||
* generated/minloc1_8_i8.c: Ditto.
|
||
* generated/minloc1_8_r10.c: Ditto.
|
||
* generated/minloc1_8_r16.c: Ditto.
|
||
* generated/minloc1_8_r4.c: Ditto.
|
||
* generated/minloc1_8_r8.c: Ditto.
|
||
* generated/minloc1_8_s1.c: Ditto.
|
||
* generated/minloc1_8_s4.c: Ditto.
|
||
* generated/minval1_s1.c: Ditto.
|
||
* generated/minval1_s4.c: Ditto.
|
||
* generated/minval_i1.c: Ditto.
|
||
* generated/minval_i16.c: Ditto.
|
||
* generated/minval_i2.c: Ditto.
|
||
* generated/minval_i4.c: Ditto.
|
||
* generated/minval_i8.c: Ditto.
|
||
* generated/minval_r10.c: Ditto.
|
||
* generated/minval_r16.c: Ditto.
|
||
* generated/minval_r4.c: Ditto.
|
||
* generated/minval_r8.c: Ditto.
|
||
* generated/norm2_r10.c: Ditto.
|
||
* generated/norm2_r16.c: Ditto.
|
||
* generated/norm2_r4.c: Ditto.
|
||
* generated/norm2_r8.c: Ditto.
|
||
* generated/parity_l1.c: Ditto.
|
||
* generated/parity_l16.c: Ditto.
|
||
* generated/parity_l2.c: Ditto.
|
||
* generated/parity_l4.c: Ditto.
|
||
* generated/parity_l8.c: Ditto.
|
||
* generated/product_c10.c: Ditto.
|
||
* generated/product_c16.c: Ditto.
|
||
* generated/product_c4.c: Ditto.
|
||
* generated/product_c8.c: Ditto.
|
||
* generated/product_i1.c: Ditto.
|
||
* generated/product_i16.c: Ditto.
|
||
* generated/product_i2.c: Ditto.
|
||
* generated/product_i4.c: Ditto.
|
||
* generated/product_i8.c: Ditto.
|
||
* generated/product_r10.c: Ditto.
|
||
* generated/product_r16.c: Ditto.
|
||
* generated/product_r4.c: Ditto.
|
||
* generated/product_r8.c: Ditto.
|
||
* generated/reshape_c10.c: Ditto.
|
||
* generated/reshape_c16.c: Ditto.
|
||
* generated/reshape_c4.c: Ditto.
|
||
* generated/reshape_c8.c: Ditto.
|
||
* generated/reshape_i16.c: Ditto.
|
||
* generated/reshape_i4.c: Ditto.
|
||
* generated/reshape_i8.c: Ditto.
|
||
* generated/reshape_r10.c: Ditto.
|
||
* generated/reshape_r16.c: Ditto.
|
||
* generated/reshape_r4.c: Ditto.
|
||
* generated/reshape_r8.c: Ditto.
|
||
* generated/spread_c10.c: Ditto.
|
||
* generated/spread_c16.c: Ditto.
|
||
* generated/spread_c4.c: Ditto.
|
||
* generated/spread_c8.c: Ditto.
|
||
* generated/spread_i1.c: Ditto.
|
||
* generated/spread_i16.c: Ditto.
|
||
* generated/spread_i2.c: Ditto.
|
||
* generated/spread_i4.c: Ditto.
|
||
* generated/spread_i8.c: Ditto.
|
||
* generated/spread_r10.c: Ditto.
|
||
* generated/spread_r16.c: Ditto.
|
||
* generated/spread_r4.c: Ditto.
|
||
* generated/spread_r8.c: Ditto.
|
||
* generated/sum_c10.c: Ditto.
|
||
* generated/sum_c16.c: Ditto.
|
||
* generated/sum_c4.c: Ditto.
|
||
* generated/sum_c8.c: Ditto.
|
||
* generated/sum_i1.c: Ditto.
|
||
* generated/sum_i16.c: Ditto.
|
||
* generated/sum_i2.c: Ditto.
|
||
* generated/sum_i4.c: Ditto.
|
||
* generated/sum_i8.c: Ditto.
|
||
* generated/sum_r10.c: Ditto.
|
||
* generated/sum_r16.c: Ditto.
|
||
* generated/sum_r4.c: Ditto.
|
||
* generated/sum_r8.c: Ditto.
|
||
|
||
2018-06-01 Steven G. Kargl <kargl@gcc.gnu.org>
|
||
|
||
PR fortran/63570
|
||
* libgfortran/Makefile.am: Add random_init.f90 to build.
|
||
* libgfortran/Makefile.in: Regenerated.
|
||
* libgfortran/gfortran.map: Expose symbol for _gfortran_random_init.
|
||
* libgfortran/intrinsics/random_init.f90: Implementation.
|
||
|
||
2018-05-28 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
|
||
PR libgfortran/85840
|
||
* io/write.c (write_real, write_real_g0, write_complex): Use
|
||
separate local variables for the float string length.
|
||
|
||
2018-05-26 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
|
||
PR libgfortran/85906
|
||
* io/write.c (write_integer): Initialise the fnode format to
|
||
FMT_NONE, used for list directed write.
|
||
(BUF_STACK_SZ): Bump default buffer size up to avoid allocs on
|
||
small stuff.
|
||
|
||
2018-05-26 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
|
||
PR libgfortran/85840
|
||
* io/write.c (write_float_0): Use separate local variable for
|
||
the float string length.
|
||
|
||
2018-05-08 Thomas Koenig <tkoenig@gcc.gnu.org>
|
||
|
||
PR fortran/54613
|
||
* m4/iforeach-s.m4: Remove assertion that back is zero.
|
||
* m4/iforeach.m4: Likewise. Remove leading 'do'
|
||
before implementation start.
|
||
* m4/ifunction-s.m4: Remove assertion that back is zero.
|
||
* m4/ifunction.m4: Likewise. Remove for loop if HAVE_BACK_ARG
|
||
is defined.
|
||
* m4/maxloc0.m4: Reorganize loops. Split loops between >= and =,
|
||
depending if back is true. Mark the condition of having
|
||
found a value which exceeds the limit as unlikely.
|
||
* m4/minloc0.m4: Likewise.
|
||
* m4/maxloc1.m4: Likewise.
|
||
* m4/minloc1.m4: Likewise.
|
||
* m4/maxloc1s.m4: Handle back argument.
|
||
* m4/minloc1s.m4: Likewise.
|
||
* m4/maxloc2s.m4: Remove assertion that back is zero.
|
||
Remove special handling of loop start. Handle back argument.
|
||
* m4/minloc2s.m4: Likewise.
|
||
* generated/iall_i1.c: Regenerated.
|
||
* generated/iall_i16.c: Regenerated.
|
||
* generated/iall_i2.c: Regenerated.
|
||
* generated/iall_i4.c: Regenerated.
|
||
* generated/iall_i8.c: Regenerated.
|
||
* generated/iany_i1.c: Regenerated.
|
||
* generated/iany_i16.c: Regenerated.
|
||
* generated/iany_i2.c: Regenerated.
|
||
* generated/iany_i4.c: Regenerated.
|
||
* generated/iany_i8.c: Regenerated.
|
||
* generated/iparity_i1.c: Regenerated.
|
||
* generated/iparity_i16.c: Regenerated.
|
||
* generated/iparity_i2.c: Regenerated.
|
||
* generated/iparity_i4.c: Regenerated.
|
||
* generated/iparity_i8.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_16_s1.c: Regenerated.
|
||
* generated/maxloc0_16_s4.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_4_s1.c: Regenerated.
|
||
* generated/maxloc0_4_s4.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/maxloc0_8_s1.c: Regenerated.
|
||
* generated/maxloc0_8_s4.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_16_s1.c: Regenerated.
|
||
* generated/maxloc1_16_s4.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_4_s1.c: Regenerated.
|
||
* generated/maxloc1_4_s4.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/maxloc1_8_s1.c: Regenerated.
|
||
* generated/maxloc1_8_s4.c: Regenerated.
|
||
* generated/maxloc2_16_s1.c: Regenerated.
|
||
* generated/maxloc2_16_s4.c: Regenerated.
|
||
* generated/maxloc2_4_s1.c: Regenerated.
|
||
* generated/maxloc2_4_s4.c: Regenerated.
|
||
* generated/maxloc2_8_s1.c: Regenerated.
|
||
* generated/maxloc2_8_s4.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_16_s1.c: Regenerated.
|
||
* generated/minloc0_16_s4.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_4_s1.c: Regenerated.
|
||
* generated/minloc0_4_s4.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/minloc0_8_s1.c: Regenerated.
|
||
* generated/minloc0_8_s4.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_16_s1.c: Regenerated.
|
||
* generated/minloc1_16_s4.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_4_s1.c: Regenerated.
|
||
* generated/minloc1_4_s4.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/minloc1_8_s1.c: Regenerated.
|
||
* generated/minloc1_8_s4.c: Regenerated.
|
||
* generated/minloc2_16_s1.c: Regenerated.
|
||
* generated/minloc2_16_s4.c: Regenerated.
|
||
* generated/minloc2_4_s1.c: Regenerated.
|
||
* generated/minloc2_4_s4.c: Regenerated.
|
||
* generated/minloc2_8_s1.c: Regenerated.
|
||
* generated/minloc2_8_s4.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/norm2_r10.c: Regenerated.
|
||
* generated/norm2_r16.c: Regenerated.
|
||
* generated/norm2_r4.c: Regenerated.
|
||
* generated/norm2_r8.c: Regenerated.
|
||
* generated/parity_l1.c: Regenerated.
|
||
* generated/parity_l16.c: Regenerated.
|
||
* generated/parity_l2.c: Regenerated.
|
||
* generated/parity_l4.c: Regenerated.
|
||
* generated/parity_l8.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.
|
||
|
||
2018-04-24 H.J. Lu <hongjiu.lu@intel.com>
|
||
|
||
* configure: Regenerated.
|
||
|
||
2018-04-19 Thomas Schwinge <thomas@codesourcery.com>
|
||
|
||
PR libfortran/85166
|
||
PR libgomp/85463
|
||
* runtime/minimal.c (stop_numeric): Reimplement.
|
||
(stop_string, error_stop_string, error_stop_numeric): New
|
||
functions.
|
||
|
||
2018-04-19 Jakub Jelinek <jakub@redhat.com>
|
||
|
||
* configure: Regenerated.
|
||
|
||
2018-04-18 David Malcolm <dmalcolm@redhat.com>
|
||
|
||
PR jit/85384
|
||
* configure: Regenerate.
|
||
|
||
2018-04-06 Thomas Koenig <tkoenig@gcc.gnu.org>
|
||
|
||
PR libfortran/85253
|
||
* m4/matmul_internal.m4: If ycount == 1, add one more row to
|
||
the internal buffer.
|
||
* generated/matmul_c10.c: Regenerated.
|
||
* generated/matmul_c16.c: Regenerated.
|
||
* generated/matmul_c4.c: Regenerated.
|
||
* generated/matmul_c8.c: Regenerated.
|
||
* generated/matmul_i1.c: Regenerated.
|
||
* generated/matmul_i16.c: Regenerated.
|
||
* generated/matmul_i2.c: Regenerated.
|
||
* generated/matmul_i4.c: Regenerated.
|
||
* generated/matmul_i8.c: Regenerated.
|
||
* generated/matmul_r10.c: Regenerated.
|
||
* generated/matmul_r16.c: Regenerated.
|
||
* generated/matmul_r4.c: Regenerated.
|
||
* generated/matmul_r8.c: Regenerated.
|
||
* generated/matmulavx128_c10.c: Regenerated.
|
||
* generated/matmulavx128_c16.c: Regenerated.
|
||
* generated/matmulavx128_c4.c: Regenerated.
|
||
* generated/matmulavx128_c8.c: Regenerated.
|
||
* generated/matmulavx128_i1.c: Regenerated.
|
||
* generated/matmulavx128_i16.c: Regenerated.
|
||
* generated/matmulavx128_i2.c: Regenerated.
|
||
* generated/matmulavx128_i4.c: Regenerated.
|
||
* generated/matmulavx128_i8.c: Regenerated.
|
||
* generated/matmulavx128_r10.c: Regenerated.
|
||
* generated/matmulavx128_r16.c: Regenerated.
|
||
* generated/matmulavx128_r4.c: Regenerated.
|
||
* generated/matmulavx128_r8.c: Regenerated.
|
||
|
||
2018-04-04 Thomas Koenig <tkoenig@gcc.gnu.org>
|
||
|
||
PR libfortran/85166
|
||
* runtime/minimal.c (stop_numeric): Add new function in order to
|
||
implement numeric stop on minimal targets.
|
||
|
||
2018-03-28 Jakub Jelinek <jakub@redhat.com>
|
||
|
||
* io/io.h (IOPARM_DT_DEFAULT_EXP): Rename to ...
|
||
(IOPARM_DT_DEC_EXT): ... this.
|
||
* io/list_read.c (parse_real): Adjust for IOPARM_DT_DEFAULT_EXP
|
||
renaming to IOPARM_DT_DEC_EXT.
|
||
(read_real): Likewise.
|
||
* io/read.c (read_f): Likewise.
|
||
|
||
2018-03-15 Jakub Jelinek <jakub@redhat.com>
|
||
|
||
PR libgfortran/84880
|
||
* intrinsics/kill.c (kill): Rename to...
|
||
(PREFIX (kill)): ... this. Use export_proto_np instead of export_proto.
|
||
|
||
2018-03-13 Steven G. Kargl <kargl@gcc.gnu.org>
|
||
|
||
* libgfortran/gfortran.map: Remove _gfortran_kill_i4,
|
||
_gfortran_kill_i4_sub, _gfortran_kill_i8, and _gfortran_kill_i8_sub.
|
||
Add _gfortran_kill and _gfortran_kill_sub.
|
||
* libgfortran/intrinsics/kill.c: Eliminate _gfortran_kill_i4,
|
||
_gfortran_kill_i4_sub, _gfortran_kill_i8, and _gfortran_kill_i8_sub.
|
||
Add _gfortran_kill and _gfortran_kill_sub.
|
||
|
||
2018-02-23 Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
PR fortran/84519
|
||
* caf/libcaf.h (_gfortran_caf_stop_numeric): Add bool argument.
|
||
(_gfortran_caf_stop_str): Likewise.
|
||
(_gfortran_caf_error_stop_str): Likewise.
|
||
(_gfortran_caf_error_stop): Likewise.
|
||
* caf/mpi.c (_gfortran_caf_error_stop_str): Handle new argument.
|
||
(_gfortran_caf_error_stop): Likewise.
|
||
* caf/single.c (_gfortran_caf_stop_numeric): Likewise.
|
||
(_gfortran_caf_stop_str): Likewise.
|
||
(_gfortran_caf_error_stop_str): Likewise.
|
||
(_gfortran_caf_error_stop): Likewise.
|
||
(_gfortran_caf_lock): Likewise.
|
||
(_gfortran_caf_unlock): Likewise.
|
||
* libgfortran.h (stop_string): Add bool argument.
|
||
* runtime/pause.c (do_pause): Add false argument.
|
||
* runtime/stop.c (stop_numeric): Handle new argument.
|
||
(stop_string): Likewise.
|
||
(error_stop_string): Likewise.
|
||
(error_stop_numeric): Likewise.
|
||
|
||
2018-02-22 Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
PR 78534
|
||
PR 84509
|
||
* runtime/pause.c (pause_numeric): Modify to take GFC_INTEGER_8
|
||
argument.
|
||
(pause_string): Modify to take size_t character length argument.
|
||
|
||
2018-02-22 Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
* libgfortran.h (stop_string): Use size_t for character length.
|
||
* runtime/stop.c (stop_string): Likewise.
|
||
(error_stop_string): Likewise.
|
||
(stop_numeric): Use int for exit code.
|
||
(error_stop_numeric): Likewise.
|
||
* caf/libcaf.h: Remove stdint.h include.
|
||
(_gfortran_caf_register): Use size_t for character length.
|
||
(_gfortran_caf_deregister): Likewise.
|
||
(_gfortran_caf_sync_all): Likewise.
|
||
(_gfortran_caf_sync_memory): Likewise.
|
||
(_gfortran_caf_sync_images): Likewise.
|
||
(_gfortran_caf_stop_numeric): Use int for exit code.
|
||
(_gfortran_caf_stop_str): Use size_t for character length.
|
||
(_gfortran_caf_error_stop_str): Likewise.
|
||
(_gfortran_caf_error_stop): Use int for exit code.
|
||
(_gfortran_caf_co_broadcast): Use size_t for character length.
|
||
(_gfortran_caf_co_sum): Likewise.
|
||
(_gfortran_caf_co_min): Likewise.
|
||
(_gfortran_caf_co_max): Likewise.
|
||
(_gfortran_caf_co_reduce): Likewise.
|
||
(_gfortran_caf_lock): Likewise.
|
||
(_gfortran_caf_unlock): Likewise.
|
||
(_gfortran_caf_event_post): Likewise.
|
||
(_gfortran_caf_event_wait): Likewise.
|
||
* caf/mpi.c (_gfortran_caf_register): Update implementation to
|
||
match prototype.
|
||
(_gfortran_caf_deregister): Likewise.
|
||
(_gfortran_caf_sync_all): Likewise.
|
||
(_gfortran_caf_sync_images): Likewise.
|
||
(_gfortran_caf_error_stop_str): Likewise.
|
||
(_gfortran_caf_error_stop): Likewise.
|
||
* caf/single.c (caf_internal_error): Likewise.
|
||
(_gfortran_caf_register): Likewise.
|
||
(_gfortran_caf_deregister): Likewise.
|
||
(_gfortran_caf_sync_all): Likewise.
|
||
(_gfortran_caf_sync_memory): Likewise.
|
||
(_gfortran_caf_sync_images): Likewise.
|
||
(_gfortran_caf_stop_numeric): Likewise.
|
||
(_gfortran_caf_stop_str): Likewise.
|
||
(_gfortran_caf_error_stop_str): Likewise.
|
||
(_gfortran_caf_error_stop): Likewise.
|
||
(_gfortran_caf_co_broadcast): Likewise.
|
||
(_gfortran_caf_co_sum): Likewise.
|
||
(_gfortran_caf_co_min): Likewise.
|
||
(_gfortran_caf_co_max): Likewise.
|
||
(_gfortran_caf_co_reduce): Likewise.
|
||
(_gfortran_caf_event_post): Likewise.
|
||
(_gfortran_caf_event_wait): Likewise.
|
||
(_gfortran_caf_lock): Likewise.
|
||
(_gfortran_caf_unlock): Likewise.
|
||
|
||
2018-02-19 Andre Vehreschild <vehre@gcc.gnu.org>
|
||
|
||
* caf/libcaf.h: Add type parameters to the caf_*_by_ref prototypes.
|
||
* caf/single.c (get_for_ref): Simplifications and now respecting
|
||
the type argument.
|
||
(_gfortran_caf_get_by_ref): Added source type handing to get_for_ref().
|
||
(send_by_ref): Simplifications and respecting the dst_type now.
|
||
(_gfortran_caf_send_by_ref): Added destination type hand over to
|
||
send_by_ref().
|
||
(_gfortran_caf_sendget_by_ref): Added general support and fixed stack
|
||
corruption. The function is now really usable.
|
||
|
||
2018-02-14 Igor Tsimbalist <igor.v.tsimbalist@intel.com>
|
||
|
||
PR target/84148
|
||
* configure: Regenerate.
|
||
|
||
2018-02-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
|
||
PR libgfortran/84412
|
||
* io/transfer.c (finalize_transfer): After completng an internal unit
|
||
I/O operation, clear internal_unit_kind.
|
||
|
||
2018-02-12 Thomas Koenig <tkoenig@gcc.gnu.org>
|
||
|
||
* libgfortran.h (GFC_ARRAY_DESCRIPTOR): Remove dimension
|
||
of descriptor to use vaiable members for dim.
|
||
Change usage of GFC_ARRAY_DESCRIPTOR accordingly.
|
||
(GFC_FILL_ARRAY_DESCRIPTOR): New macro.
|
||
(gfc_full_array_i4): New type.
|
||
* intrinsics/date_and_time.c (secnds): Use sizeof
|
||
(gfc_array_i4) + sizeof (descriptor_dimension) for memory
|
||
allocation.
|
||
* intrinsics/reshape_generic.c: Use GFC_FULL_ARRAY_DESCRIPTOR.
|
||
* io/format.c: Use sizeof (gfc_array_i4) + sizeof
|
||
(descriptor_dimension) for memoy allocation.
|
||
* io/list_read.c (list_formatted_read_scalar): Use
|
||
gfc_full_array_i4 for variable.
|
||
(nml_read_obj): Likewise.
|
||
* io/write.c (list_formatted_write_scalar): Likewise.
|
||
(nml_write_obj): Likewise.
|
||
* m4/reshape.m4: Use GFC_FULL_ARRAY_DESCRIPTOR.
|
||
* generated/reshape_c10.c: Regenerated.
|
||
* generated/reshape_c16.c: Regenerated.
|
||
* generated/reshape_c4.c: Regenerated.
|
||
* generated/reshape_c8.c: Regenerated.
|
||
* generated/reshape_i16.c: Regenerated.
|
||
* generated/reshape_i4.c: Regenerated.
|
||
* generated/reshape_i8.c: Regenerated.
|
||
* generated/reshape_r10.c: Regenerated.
|
||
* generated/reshape_r16.c: Regenerated.
|
||
* generated/reshape_r4.c: Regenerated.
|
||
* generated/reshape_r8.c: Regenerated.
|
||
|
||
2018-01-31 Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
* generated/cshift1_16.c (cshift1): Regenerated.
|
||
* generated/cshift1_4.c (cshift1): Regenerated.
|
||
* generated/cshift1_8.c (cshift1): Regenerated.
|
||
* generated/eoshift1_16.c (eoshift1): Regenerated.
|
||
* generated/eoshift1_4.c (eoshift1): Regenerated.
|
||
* generated/eoshift1_8.c (eoshift1): Regenerated.
|
||
* generated/eoshift3_16.c (eoshift3): Regenerated.
|
||
* generated/eoshift3_4.c (eoshift3): Regenerated.
|
||
* generated/eoshift3_8.c (eoshift3): Regenerated.
|
||
* generated/in_pack_c10.c (internal_pack_c10): Regenerated.
|
||
* generated/in_pack_c16.c (internal_pack_c16): Regenerated.
|
||
* generated/in_pack_c4.c (internal_pack_c4): Regenerated.
|
||
* generated/in_pack_c8.c (internal_pack_c8): Regenerated.
|
||
* generated/in_pack_i1.c (internal_pack_1): Regenerated.
|
||
* generated/in_pack_i16.c (internal_pack_16): Regenerated.
|
||
* generated/in_pack_i2.c (internal_pack_2): Regenerated.
|
||
* generated/in_pack_i4.c (internal_pack_4): Regenerated.
|
||
* generated/in_pack_i8.c (internal_pack_8): Regenerated.
|
||
* generated/in_pack_r10.c (internal_pack_r10): Regenerated.
|
||
* generated/in_pack_r16.c (internal_pack_r16): Regenerated.
|
||
* generated/in_pack_r4.c (internal_pack_r4): Regenerated.
|
||
* generated/in_pack_r8.c (internal_pack_r8): Regenerated.
|
||
* generated/in_unpack_c10.c (internal_unpack_c10): Regenerated.
|
||
* generated/in_unpack_c16.c (internal_unpack_c16): Regenerated.
|
||
* generated/in_unpack_c4.c (internal_unpack_c4): Regenerated.
|
||
* generated/in_unpack_c8.c (internal_unpack_c8): Regenerated.
|
||
* generated/in_unpack_i1.c (internal_unpack_1): Regenerated.
|
||
* generated/in_unpack_i16.c (internal_unpack_16): Regenerated.
|
||
* generated/in_unpack_i2.c (internal_unpack_2): Regenerated.
|
||
* generated/in_unpack_i4.c (internal_unpack_4): Regenerated.
|
||
* generated/in_unpack_i8.c (internal_unpack_8): Regenerated.
|
||
* generated/in_unpack_r10.c (internal_unpack_r10): Regenerated.
|
||
* generated/in_unpack_r16.c (internal_unpack_r16): Regenerated.
|
||
* generated/in_unpack_r4.c (internal_unpack_r4): Regenerated.
|
||
* generated/in_unpack_r8.c (internal_unpack_r8): Regenerated.
|
||
* generated/reshape_c10.c (reshape_c10): Regenerated.
|
||
* generated/reshape_c16.c (reshape_c16): Regenerated.
|
||
* generated/reshape_c4.c (reshape_c4): Regenerated.
|
||
* generated/reshape_c8.c (reshape_c8): Regenerated.
|
||
* generated/reshape_i16.c (reshape_16): Regenerated.
|
||
* generated/reshape_i4.c (reshape_4): Regenerated.
|
||
* generated/reshape_i8.c (reshape_8): Regenerated.
|
||
* generated/reshape_r10.c (reshape_r10): Regenerated.
|
||
* generated/reshape_r16.c (reshape_r16): Regenerated.
|
||
* generated/reshape_r4.c (reshape_r4): Regenerated.
|
||
* generated/reshape_r8.c (reshape_r8): Regenerated.
|
||
* generated/shape_i1.c (shape_1): Regenerated.
|
||
* generated/shape_i16.c (shape_16): Regenerated.
|
||
* generated/shape_i2.c (shape_2): Regenerated.
|
||
* generated/shape_i4.c (shape_4): Regenerated.
|
||
* generated/shape_i8.c (shape_8): Regenerated.
|
||
* generated/spread_c10.c (spread_scalar_c10): Regenerated.
|
||
* generated/spread_c16.c (spread_scalar_c16): Regenerated.
|
||
* generated/spread_c4.c (spread_scalar_c4): Regenerated.
|
||
* generated/spread_c8.c (spread_scalar_c8): Regenerated.
|
||
* generated/spread_i1.c (spread_scalar_i1): Regenerated.
|
||
* generated/spread_i16.c (spread_scalar_i16): Regenerated.
|
||
* generated/spread_i2.c (spread_scalar_i2): Regenerated.
|
||
* generated/spread_i4.c (spread_scalar_i4): Regenerated.
|
||
* generated/spread_i8.c (spread_scalar_i8): Regenerated.
|
||
* generated/spread_r10.c (spread_scalar_r10): Regenerated.
|
||
* generated/spread_r16.c (spread_scalar_r16): Regenerated.
|
||
* generated/spread_r4.c (spread_scalar_r4): Regenerated.
|
||
* generated/spread_r8.c (spread_scalar_r8): Regenerated.
|
||
* intrinsics/random.c (jump): Use size_t for array index in loop.
|
||
(getosrandom): Likewise.
|
||
(arandom_r4): Make n an index_type.
|
||
(arandom_r8): Likewise.
|
||
(arandom_r10): Likewise.
|
||
(arandom_r16): Likewise.
|
||
(scramble_seed): Use size_t for array index in loop.
|
||
* m4/cshift1.m4: Make i an index_type.
|
||
* m4/eoshift1.m4: Likewise.
|
||
* m4/eoshift3.m4: Likewise.
|
||
* m4/in_pack.m4: Make n an index_type.
|
||
* m4/in_unpack.m4: Likewise.
|
||
* m4/reshape.m4: Make n and dim index_type's.
|
||
* m4/shape.m4: Make n an index_type.
|
||
* m4/spread.m4: Likewise, use index_type argument rather than
|
||
copying to int.
|
||
* runtime/bounds.c (bounds_ifunction_return): Make n an
|
||
index_type.
|
||
* runtime/in_pack_generic.c (internal_pack): Likewise.
|
||
* runtime/in_unpack_generic.c (internal_unpack): Make n and size
|
||
index_type's.
|
||
|
||
2018-01-30 Thomas Koenig <tkoenig@gcc.gnu.org>
|
||
|
||
PR fortran/37577
|
||
* libgfortran.h: Remove GFC_DTYPE_DERIVED_1, GFC_DTYPE_DERIVED_2,
|
||
GFC_DTYPE_DERIVED_4, GFC_DTYPE_DERIVED_8 and GFC_DTYPE_DERIVED_16.
|
||
* m4/cshift1.m4: Remove GFC_DTYPE_DERIVED_1.
|
||
* generated/cshift1_16.c: Regenerated.
|
||
* generated/cshift1_4.c: Regenerated.
|
||
* generated/cshift1_8.c: Regenerated.
|
||
* intrinsics/cshift0.c: Remove GFC_DTYPE_DERIVED_1.
|
||
* intrinsics/pack_generic.c (pack): Move handling of other types
|
||
into separate switch statement.
|
||
* intrinsics/spread_generic.c (spread): Likewise.
|
||
(spread_scalar): Likewise.
|
||
* intrinsics/unpack_generic.c (unpack1): Likewise.
|
||
(unpack0): Likewise.
|
||
* runtime/in_pack_generic.c (internal_pack): Likewise.
|
||
* runtime/in_unpack_generic.c (internal_unpack): Likewise.
|
||
|
||
2018-01-25 Paul Thomas <pault@gcc.gnu.org>
|
||
|
||
PR fortran/37577
|
||
* caf/single.c (_gfortran_caf_failed_images): Access the 'type'
|
||
and 'elem_len' fields of the dtype instead of the shifts.
|
||
(_gfortran_caf_stopped_images): Likewise.
|
||
* intrinsics/associated.c (associated): Compare the 'type' and
|
||
'elem_len' fields instead of the dtype.
|
||
* caf/date_and_time.c : Access the dtype fields rather using
|
||
shifts and masks.
|
||
* io/transfer.c (transfer_array ): Comment on item count.
|
||
(set_nml_var,st_set_nml_var): Change dtype type and use fields.
|
||
(st_set_nml_dtio_var): Likewise.
|
||
* libgfortran.h : Change definition of GFC_ARRAY_DESCRIPTOR and
|
||
add a typedef for the dtype_type. Change the GFC_DTYPE_* macros
|
||
to access the dtype fields.
|
||
|
||
2018-01-15 Thomas Koenig <tkoenig@gcc.gnu.org>
|
||
|
||
PR fortran/54613
|
||
* m4/iparm.m4: Add back_arg macro if in minloc or maxloc.
|
||
* m4/iforeach-s.m4: Add optional argument back with back_arg
|
||
macro. Improve m4 quoting. If HAVE_BACK_ARG is defined, assert
|
||
that back is non-true.
|
||
* m4/iforeach.m4: Likewise.
|
||
* m4/ifunction-s.m4: Likewise.
|
||
* m4/ifunction.m4: Likewise.
|
||
* m4/maxloc0.m4: Include assert.h
|
||
* m4/minloc0.m4: Likewise.
|
||
* m4/maxloc0s.m4: #define HAVE_BACK_ARG.
|
||
* m4/minloc0s.m4: Likewise.
|
||
* m4/maxloc1s.m4: Likewise.
|
||
* m4/minloc1s.m4: Likewise.
|
||
* m4/maxloc1.m4: Include assert.h, #define HAVE_BACK_ARG.
|
||
* m4/minloc1.m4: Likewise.
|
||
* m4/maxloc2s.m4: Add assert.h, add back_arg, assert that
|
||
back is non-true.
|
||
* m4/minloc2s.m4: Likewise.
|
||
* generated/iall_i1.c: Regenerated.
|
||
* generated/iall_i16.c: Regenerated.
|
||
* generated/iall_i2.c: Regenerated.
|
||
* generated/iall_i4.c: Regenerated.
|
||
* generated/iall_i8.c: Regenerated.
|
||
* generated/iany_i1.c: Regenerated.
|
||
* generated/iany_i16.c: Regenerated.
|
||
* generated/iany_i2.c: Regenerated.
|
||
* generated/iany_i4.c: Regenerated.
|
||
* generated/iany_i8.c: Regenerated.
|
||
* generated/iparity_i1.c: Regenerated.
|
||
* generated/iparity_i16.c: Regenerated.
|
||
* generated/iparity_i2.c: Regenerated.
|
||
* generated/iparity_i4.c: Regenerated.
|
||
* generated/iparity_i8.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_16_s1.c: Regenerated.
|
||
* generated/maxloc0_16_s4.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_4_s1.c: Regenerated.
|
||
* generated/maxloc0_4_s4.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/maxloc0_8_s1.c: Regenerated.
|
||
* generated/maxloc0_8_s4.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_16_s1.c: Regenerated.
|
||
* generated/maxloc1_16_s4.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_4_s1.c: Regenerated.
|
||
* generated/maxloc1_4_s4.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/maxloc1_8_s1.c: Regenerated.
|
||
* generated/maxloc1_8_s4.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_16_s1.c: Regenerated.
|
||
* generated/minloc0_16_s4.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_4_s1.c: Regenerated.
|
||
* generated/minloc0_4_s4.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/minloc0_8_s1.c: Regenerated.
|
||
* generated/minloc0_8_s4.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_16_s1.c: Regenerated.
|
||
* generated/minloc1_16_s4.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_4_s1.c: Regenerated.
|
||
* generated/minloc1_4_s4.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/minloc1_8_s1.c: Regenerated.
|
||
* generated/minloc1_8_s4.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/norm2_r10.c: Regenerated.
|
||
* generated/norm2_r16.c: Regenerated.
|
||
* generated/norm2_r4.c: Regenerated.
|
||
* generated/norm2_r8.c: Regenerated.
|
||
* generated/parity_l1.c: Regenerated.
|
||
* generated/parity_l16.c: Regenerated.
|
||
* generated/parity_l2.c: Regenerated.
|
||
* generated/parity_l4.c: Regenerated.
|
||
* generated/parity_l8.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.
|
||
|
||
2018-01-14 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
|
||
PR libgfortran/83811
|
||
* write.c (select_buffer): Adjust buffer size up by 1.
|
||
|
||
2018-01-08 Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
PR 78534, bugfix for r256322
|
||
* io/transfer.c (next_record_w): Use correct type for return value
|
||
of next_array_record.
|
||
|
||
2018-01-07 Thomas Koenig <tkoenig@gcc.gnu.org>
|
||
|
||
* libgfortran.h (GFC_DTYPE_COPY): New macro.
|
||
(GFC_DTYPE_COPY_SETRANK): New macro.
|
||
(GFC_DTYPE_IS_UNSET): New macro.
|
||
* intrinsics/cshift0.c (cshift0): Use new macros.
|
||
* intrinsics/eoshift0.c (eoshift0): Likewise.
|
||
* intrinsics/eoshift2.c (eoshift2): Likewise.
|
||
* intrinsics/move_alloc.c (move_alloc): Likewise.
|
||
* intrinsics/reshape_generic.c (reshape_internal): Likewise.
|
||
* intrinsics/spread_generic.c (spread_internal): Likewise.
|
||
* intrinsics/spread_generic.c (spread_scalar): Likewise.
|
||
* intrinsics/spread_generic.c (spread_char_scalar): Likewise.
|
||
* intrinsics/spread_generic.c (spread_char4_scalar): Likewise.
|
||
* intrinsics/unpack_generic.c (unpack0): Likewise.
|
||
* intrinsics/unpack_generic.c (unpack0_char): Likewise.
|
||
* intrinsics/unpack_generic.c (unpack0_char4): Likewise.
|
||
* m4/cshift1.m4 (cshift1): Likewise.
|
||
* m4/eoshift1.m4 (eoshift1): Likewise.
|
||
* m4/eoshift3.m4 (eoshift3): Likewise.
|
||
* m4/iforeach-s.m4: Likewise.
|
||
* m4/iforeach.m4: Likewise.
|
||
* m4/ifunction-s.m4: Likewise.
|
||
* m4/ifunction-s2.m4: Likewise.
|
||
* m4/ifunction.m4: Likewise.
|
||
* m4/ifunction_logical.m4: Likewise.
|
||
* m4/reshape.m4: Likewise.
|
||
* m4/spread.m4: Likewise.
|
||
* generated/all_l1.c : Regenerated.
|
||
* generated/all_l16.c : Regenerated.
|
||
* generated/all_l2.c : Regenerated.
|
||
* generated/all_l4.c : Regenerated.
|
||
* generated/all_l8.c : Regenerated.
|
||
* generated/any_l1.c : Regenerated.
|
||
* generated/any_l16.c : Regenerated.
|
||
* generated/any_l2.c : Regenerated.
|
||
* generated/any_l4.c : Regenerated.
|
||
* generated/any_l8.c : Regenerated.
|
||
* generated/count_16_l.c : Regenerated.
|
||
* generated/count_1_l.c : Regenerated.
|
||
* generated/count_2_l.c : Regenerated.
|
||
* generated/count_4_l.c : Regenerated.
|
||
* generated/count_8_l.c : Regenerated.
|
||
* generated/cshift1_16.c : Regenerated.
|
||
* generated/cshift1_4.c : Regenerated.
|
||
* generated/cshift1_8.c : Regenerated.
|
||
* generated/eoshift1_16.c : Regenerated.
|
||
* generated/eoshift1_4.c : Regenerated.
|
||
* generated/eoshift1_8.c : Regenerated.
|
||
* generated/eoshift3_16.c : Regenerated.
|
||
* generated/eoshift3_4.c : Regenerated.
|
||
* generated/eoshift3_8.c : Regenerated.
|
||
* generated/iall_i1.c : Regenerated.
|
||
* generated/iall_i16.c : Regenerated.
|
||
* generated/iall_i2.c : Regenerated.
|
||
* generated/iall_i4.c : Regenerated.
|
||
* generated/iall_i8.c : Regenerated.
|
||
* generated/iany_i1.c : Regenerated.
|
||
* generated/iany_i16.c : Regenerated.
|
||
* generated/iany_i2.c : Regenerated.
|
||
* generated/iany_i4.c : Regenerated.
|
||
* generated/iany_i8.c : Regenerated.
|
||
* generated/iparity_i1.c : Regenerated.
|
||
* generated/iparity_i16.c : Regenerated.
|
||
* generated/iparity_i2.c : Regenerated.
|
||
* generated/iparity_i4.c : Regenerated.
|
||
* generated/iparity_i8.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_16_s1.c : Regenerated.
|
||
* generated/maxloc0_16_s4.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_4_s1.c : Regenerated.
|
||
* generated/maxloc0_4_s4.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/maxloc0_8_s1.c : Regenerated.
|
||
* generated/maxloc0_8_s4.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_16_s1.c : Regenerated.
|
||
* generated/maxloc1_16_s4.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_4_s1.c : Regenerated.
|
||
* generated/maxloc1_4_s4.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/maxloc1_8_s1.c : Regenerated.
|
||
* generated/maxloc1_8_s4.c : Regenerated.
|
||
* generated/maxval1_s1.c : Regenerated.
|
||
* generated/maxval1_s4.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_16_s1.c : Regenerated.
|
||
* generated/minloc0_16_s4.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_4_s1.c : Regenerated.
|
||
* generated/minloc0_4_s4.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/minloc0_8_s1.c : Regenerated.
|
||
* generated/minloc0_8_s4.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_16_s1.c : Regenerated.
|
||
* generated/minloc1_16_s4.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_4_s1.c : Regenerated.
|
||
* generated/minloc1_4_s4.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/minloc1_8_s1.c : Regenerated.
|
||
* generated/minloc1_8_s4.c : Regenerated.
|
||
* generated/minval1_s1.c : Regenerated.
|
||
* generated/minval1_s4.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/norm2_r10.c : Regenerated.
|
||
* generated/norm2_r16.c : Regenerated.
|
||
* generated/norm2_r4.c : Regenerated.
|
||
* generated/norm2_r8.c : Regenerated.
|
||
* generated/parity_l1.c : Regenerated.
|
||
* generated/parity_l16.c : Regenerated.
|
||
* generated/parity_l2.c : Regenerated.
|
||
* generated/parity_l4.c : Regenerated.
|
||
* generated/parity_l8.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/reshape_c10.c : Regenerated.
|
||
* generated/reshape_c16.c : Regenerated.
|
||
* generated/reshape_c4.c : Regenerated.
|
||
* generated/reshape_c8.c : Regenerated.
|
||
* generated/reshape_i16.c : Regenerated.
|
||
* generated/reshape_i4.c : Regenerated.
|
||
* generated/reshape_i8.c : Regenerated.
|
||
* generated/reshape_r10.c : Regenerated.
|
||
* generated/reshape_r16.c : Regenerated.
|
||
* generated/reshape_r4.c : Regenerated.
|
||
* generated/reshape_r8.c : Regenerated.
|
||
* generated/spread_c10.c : Regenerated.
|
||
* generated/spread_c16.c : Regenerated.
|
||
* generated/spread_c4.c : Regenerated.
|
||
* generated/spread_c8.c : Regenerated.
|
||
* generated/spread_i1.c : Regenerated.
|
||
* generated/spread_i16.c : Regenerated.
|
||
* generated/spread_i2.c : Regenerated.
|
||
* generated/spread_i4.c : Regenerated.
|
||
* generated/spread_i8.c : Regenerated.
|
||
* generated/spread_r10.c : Regenerated.
|
||
* generated/spread_r16.c : Regenerated.
|
||
* generated/spread_r4.c : Regenerated.
|
||
* generated/spread_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.
|
||
|
||
2018-01-07 Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
PR fortran/78534
|
||
PR fortran/83704
|
||
* io/fbuf.c (fbuf_init): Use size_t instead of int for length.
|
||
(fbuf_debug): Convert debug output to unsigned long.
|
||
(fbuf_reset): Use ptrdiff_t for return value.
|
||
(fbuf_alloc): Use size_t for length argument.
|
||
(fbuf_flush): Handle large buffers.
|
||
(fbuf_flush_list): Likewise.
|
||
(fbuf_seek): Use ptrdiff_t for offset and return value.
|
||
(fbuf_read): Use size_t for length argument.
|
||
(fbuf_getc_refill): Use size_t to match fbuf_read.
|
||
* io/fbuf.h (struct fbuf): Use size_t for lengths.
|
||
(fbuf_init): Use size_t instead of int for length.
|
||
(fbuf_reset): Use ptrdiff_t for return value.
|
||
(fbuf_alloc): Use size_t for length argument.
|
||
(fbuf_seek): Use ptrdiff_t for offset and return value.
|
||
(fbuf_read): Use size_t for length argument.
|
||
* io/io.h (read_block_form): Likewise.
|
||
(read_block_form4): Likewise.
|
||
(write_block): Likewise.
|
||
(read_a): Likewise.
|
||
(read_a_char4): Likewise.
|
||
(read_x): Likewise.
|
||
(write_a): Likewise.
|
||
(write_a_char4): Likewise.
|
||
* io/list_read.c (list_formatted_read_scalar): Use size_t to
|
||
handle large buffers.
|
||
* io/read.c (read_l): Likewise.
|
||
(read_utf8): Likewise.
|
||
(read_utf8_char1): Likewise.
|
||
(read_default_char1): Likewise.
|
||
(read_utf8_char4): Likewise.
|
||
(read_default_char4): Likewise.
|
||
(read_a): Likewise.
|
||
(read_a_char4): Likewise.
|
||
(eat_leading_spaces): Likewise.
|
||
(next_char): Likewise.
|
||
(read_decimal): Likewise.
|
||
(read_radix): Likewise.
|
||
(read_f): Likewise.
|
||
(read_x): Likewise.
|
||
* io/transfer.c (read_sf_internal): Likewise.
|
||
(read_sf): Likewise.
|
||
(read_block_form): Likewise.
|
||
(read_block_form4): Likewise.
|
||
(write_block): Likewise.
|
||
(formatted_transfer_scalar_write): Likewise.
|
||
(next_record_w): Likewise.
|
||
* io/unix.c (mem_alloc_r): Likewise.
|
||
(mem_alloc_r4): Likewise.
|
||
(mem_alloc_w): Likewise.
|
||
(mem_alloc_w4): Likewise.
|
||
(mem_read): Likewise.
|
||
(mem_read4): Likewise.
|
||
(mem_write): Likewise.
|
||
(mem_write4): Likewise.
|
||
(open_internal): Likewise.
|
||
(open_internal4): Likewise.
|
||
* io/unix.h (open_internal): Likewise.
|
||
(open_internal4): Likewise.
|
||
(mem_alloc_w): Likewise.
|
||
(mem_alloc_r): Likewise.
|
||
(mem_alloc_w4): Likewise.
|
||
(mem_alloc_r4): Likewise.
|
||
* io/write.c (write_check_cc): Likewise.
|
||
(write_cc): Likewise.
|
||
(write_a): Likewise.
|
||
(write_a_char4): Likewise.
|
||
|
||
2018-01-06 Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
* io/write.c (namelist_write): Remove unused variable "i".
|
||
|
||
2018-01-06 Dominique d'Humieres <dominiq@lps.ens.fr>
|
||
Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
PR fortran/83704
|
||
* io/write.c (write_character): Use size_t instead of int for
|
||
length.
|
||
|
||
2018-01-05 Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
PR fortran/78534
|
||
* intrinsics/args.c (getarg_i4): Use gfc_charlen_type.
|
||
(get_command_argument_i4): Likewise.
|
||
(get_command_i4): Likewise.
|
||
* intrinsics/chmod.c (chmod_internal): Likewise.
|
||
* intrinsics/env.c (get_environment_variable_i4): Likewise.
|
||
* intrinsics/extends_type_of.c (struct vtype): Use size_t for size
|
||
member.
|
||
* intrinsics/gerror.c (gerror): Use gfc_charlen_type.
|
||
* intrinsics/getlog.c (getlog): Likewise.
|
||
* intrinsics/hostnm.c (hostnm_0): Likewise.
|
||
* intrinsics/string_intrinsics_inc.c (string_len_trim): Rework to
|
||
work if gfc_charlen_type is unsigned.
|
||
(string_scan): Likewise.
|
||
* io/transfer.c (transfer_character): Modify prototype.
|
||
(transfer_character_write): Likewise.
|
||
(transfer_character_wide): Likewise.
|
||
(transfer_character_wide_write): Likewise.
|
||
(transfer_array): Typecast to avoid signed-unsigned comparison.
|
||
* io/unit.c (is_trim_ok): Use gfc_charlen_type.
|
||
* io/write.c (namelist_write): Likewise.
|
||
* libgfortran.h (gfc_charlen_type): Change typedef to size_t.
|
||
|
||
2018-01-03 Jakub Jelinek <jakub@redhat.com>
|
||
|
||
Update copyright years.
|
||
|
||
2018-01-02 Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
PR libgfortran/83649
|
||
* io/unix.c (MAX_CHUNK): New define.
|
||
(raw_read): For reads larger than MAX_CHUNK, loop.
|
||
(raw_write): Write no more than MAX_CHUNK bytes per iteration.
|
||
|
||
Copyright (C) 2018 Free Software Foundation, Inc.
|
||
|
||
Copying and distribution of this file, with or without modification,
|
||
are permitted in any medium without royalty provided the copyright
|
||
notice and this notice are preserved.
|