re PR fortran/88342 (Possible bug with IEEE_POSITIVE_INF and -ffpe-trap=overflow)
[official-gcc.git] / libgfortran / ChangeLog
blob6eace44944022e106289e5a61980c32293076074
1 2018-12-29  Steven G. Kargl  <kargl@gcc.gnu.org>
2       
3         PR fortran/88342
4         * ieee/ieee_arithmetic.F90: Prevent exceptions in IEEE_VALUE if
5         -ffpe-trap=invalid or -ffpe-trap=overflow is used.
7 2018-12-28  Steven G. Kargl  <kargl@gcc.gnu.org>
9         PR fortran/81984
10         * intrinsics/string_intrinsics_inc.c: Placate the sanitizer.
12 2018-12-21  Steven G. Kargl  <kargl@gcc.gnu.org>
14         PR fortran/69121
15         * ieee/ieee_arithmetic.F90: Provide missing interfaces for IEEE_SCALB.
17 2018-12-20  Steven G. Kargl  <kargl@gcc.gnu.org>
19         * ieee/ieee_arithmetic.F90: Re-organize file to 
20         eliminate #ifdef ... #endif.  No functional change.
22 2018-12-09  Thomas Koenig  <tkoenig@gcc.gnu.org>
24         PR fortran/88411
25         * io/transfer.c (dta_transfer_init): Do not treat as an
26         asynchronous statement unless the statement has
27         ASYNCHRONOUS="YES".
28         (st_write_done): Likewise.
29         (st_read_done): Do not perform async_wait for synchronous I/O
30         on an async unit.
31         (st_read_done): Likewise.
33 2018-12-02  Janne Blomqvist  <jb@gcc.gnu.org>
35         PR libfortran/88137
36         * runtime/backtrace.c (show_backtrace): Use atomic load/store to
37         access the static lbstate pointer.
39 2018-11-30  Janne Blomqvist  <jb@gcc.gnu.org>
41         PR libfortran/88137
42         * runtime/backtrace.c (show_backtrace): Make lbstate a static
43         variable, initialize once.
45 2018-11-23  Janne Blomqvist  <jb@gcc.gnu.org>
47         * runtime/error.c (MAGIC): Remove.
48         (recursion_key): New variable.
49         (recursion_check): Use thread-specific variable for recursion
50         check if threads are active.
51         (constructor_recursion_check): New function.
52         (destructor_recursion_check): New funcion.
54 2018-11-22  Janne Blomqvist  <jb@gcc.gnu.org>
56         * acinclude.m4 (LIBGFOR_CHECK_ATOMIC_FETCH_ADD): Rename and test
57         presence of atomic builtins instead of sync builtins.
58         * configure.ac (LIBGFOR_CHECK_ATOMIC_FETCH_ADD): Call new test.
59         * io/io.h (inc_waiting_locked): Use __atomic_fetch_add.
60         (predec_waiting_locked): Use __atomic_add_fetch.
61         (dec_waiting_unlocked): Use __atomic_fetch_add.
62         * config.h.in: Regenerated.
63         * configure: Regenerated.
64         * Makefile.in: Regenerated.
66 2018-11-09  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
68         PR libfortran/78351
69         * io/transfer.c (read_sf_internal): Delete leftover
70         debug code.
72 2018-11-08  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
74         PR libfortran/78351
75         * io/transfer.c (read_sf_internal): Add support for early
76         comma termination of internal unit formatted reads.
78 2018-10-31  Joseph Myers  <joseph@codesourcery.com>
80         PR bootstrap/82856
81         * Makefile.am: Include multilib.am.
82         * configure.ac: Remove AC_PREREQ.
83         * Makefile.in, aclocal.m4, config.h.in, configure: Regenerate.
85 2017-10-28  Thomas Koenig  <tkoenig@gcc.gnu.org>
87         PR fortran/54613
88         * Makefile.am: Add files for findloc.
89         * Makefile.in: Regenerated.
90         * libgfortran.h (gfc_array_index_type): Add.
91         (gfc_array_s1): Add using GFC_UINTEGER_1.
92         (gfc_array_s4): Likewise.
93         Replace unnecessary comment.
94         (HAVE_GFC_UINTEGER_1): Define.
95         (HAVE_GFC_UINTEGER_4): Define.
96         * m4/findloc0.m4: New file.
97         * m4/findloc0s.m4: New file.
98         * m4/findloc1.m4: New file.
99         * m4/findloc1s.m4: New file.
100         * m4/findloc2s.m4: New file.
101         * m4/ifindloc0.m4: New file.
102         * m4/ifindloc1.m4: New file.
103         * m4/ifindloc2.m4: New file.
104         * m4/iparm.m4: Use unsigned integer for characters.
105         * generated/findloc0_c16.c: New file.
106         * generated/findloc0_c4.c: New file.
107         * generated/findloc0_c8.c: New file.
108         * generated/findloc0_i1.c: New file.
109         * generated/findloc0_i16.c: New file.
110         * generated/findloc0_i2.c: New file.
111         * generated/findloc0_i4.c: New file.
112         * generated/findloc0_i8.c: New file.
113         * generated/findloc0_r16.c: New file.
114         * generated/findloc0_r4.c: New file.
115         * generated/findloc0_r8.c: New file.
116         * generated/findloc0_s1.c: New file.
117         * generated/findloc0_s4.c: New file.
118         * generated/findloc1_c16.c: New file.
119         * generated/findloc1_c4.c: New file.
120         * generated/findloc1_c8.c: New file.
121         * generated/findloc1_i1.c: New file.
122         * generated/findloc1_i16.c: New file.
123         * generated/findloc1_i2.c: New file.
124         * generated/findloc1_i4.c: New file.
125         * generated/findloc1_i8.c: New file.
126         * generated/findloc1_r16.c: New file.
127         * generated/findloc1_r4.c: New file.
128         * generated/findloc1_r8.c: New file.
129         * generated/findloc1_s1.c: New file.
130         * generated/findloc1_s4.c: New file.
131         * generated/findloc2_s1.c: New file.
132         * generated/findloc2_s4.c: New file.
133         * generated/maxloc0_16_s1.c: Regenerated.
134         * generated/maxloc0_16_s4.c: Regenerated.
135         * generated/maxloc0_4_s1.c: Regenerated.
136         * generated/maxloc0_4_s4.c: Regenerated.
137         * generated/maxloc0_8_s1.c: Regenerated.
138         * generated/maxloc0_8_s4.c: Regenerated.
139         * generated/maxloc1_16_s1.c: Regenerated.
140         * generated/maxloc1_16_s4.c: Regenerated.
141         * generated/maxloc1_4_s1.c: Regenerated.
142         * generated/maxloc1_4_s4.c: Regenerated.
143         * generated/maxloc1_8_s1.c: Regenerated.
144         * generated/maxloc1_8_s4.c: Regenerated.
145         * generated/maxloc2_16_s1.c: Regenerated.
146         * generated/maxloc2_16_s4.c: Regenerated.
147         * generated/maxloc2_4_s1.c: Regenerated.
148         * generated/maxloc2_4_s4.c: Regenerated.
149         * generated/maxloc2_8_s1.c: Regenerated.
150         * generated/maxloc2_8_s4.c: Regenerated.
151         * generated/maxval0_s1.c: Regenerated.
152         * generated/maxval0_s4.c: Regenerated.
153         * generated/maxval1_s1.c: Regenerated.
154         * generated/maxval1_s4.c: Regenerated.
155         * generated/minloc0_16_s1.c: Regenerated.
156         * generated/minloc0_16_s4.c: Regenerated.
157         * generated/minloc0_4_s1.c: Regenerated.
158         * generated/minloc0_4_s4.c: Regenerated.
159         * generated/minloc0_8_s1.c: Regenerated.
160         * generated/minloc0_8_s4.c: Regenerated.
161         * generated/minloc1_16_s1.c: Regenerated.
162         * generated/minloc1_16_s4.c: Regenerated.
163         * generated/minloc1_4_s1.c: Regenerated.
164         * generated/minloc1_4_s4.c: Regenerated.
165         * generated/minloc1_8_s1.c: Regenerated.
166         * generated/minloc1_8_s4.c: Regenerated.
167         * generated/minloc2_16_s1.c: Regenerated.
168         * generated/minloc2_16_s4.c: Regenerated.
169         * generated/minloc2_4_s1.c: Regenerated.
170         * generated/minloc2_4_s4.c: Regenerated.
171         * generated/minloc2_8_s1.c: Regenerated.
172         * generated/minloc2_8_s4.c: Regenerated.
173         * generated/minval0_s1.c: Regenerated.
174         * generated/minval0_s4.c: Regenerated.
175         * generated/minval1_s1.c: Regenerated.
176         * generated/minval1_s4.c: Regenerated.
178 2018-10-06  Janne Blomqvist  <jb@gcc.gnu.org>
180         * io/unix.c (compare_file_filename): Use gfc_charlen_type instead
181         of int for string length.
182         (inquire_sequential): Likewise.
183         (inquire_direct): Likewise.
184         (inquire_formatted): Likewise.
185         (inquire_unformatted): Likewise.
186         (inquire_access): Likewise.
187         (inquire_read): Likewise.
188         (inquire_write): Likewise.
189         (inquire_readwrite): Likewise.
190         * io/unix.h (compare_file_filename): Likewise.
191         (inquire_sequential): Likewise.
192         (inquire_direct): Likewise.
193         (inquire_formatted): Likewise.
194         (inquire_unformatted): Likewise.
195         (inquire_read): Likewise.
196         (inquire_write): Likewise.
197         (inquire_readwrite): Likewise.
199 2018-10-02  Gerald Pfeifer  <gerald@pfeifer.com>
201         * io/close.c [!HAVE_UNLINK_OPEN_FILE]: Include <string.h>.
203 2018-09-21  Janne Blomqvist  <jb@gcc.gnu.org>
205         * config.h.in: Regenerated.
206         * configure: Regenerated.
207         * configure.ac: Check for writev and sys/uio.h.
208         * libgfortran.h: Include sys/uio.h.
209         (st_vprintf): Remove prototype.
210         (struct iovec): Define if not available.
211         (estr_writev): New prototype.
212         * runtime/backtrace.c (error_callback): Use estr_writev.
213         * runtime/error.c (ST_VPRINTF_SIZE): Remove.
214         (estr_writev): New function.
215         (st_vprintf): Remove.
216         (gf_vsnprintf): New function.
217         (ST_ERRBUF_SIZE): New macro.
218         (st_printf): Use vsnprintf.
219         (os_error): Use estr_writev.
220         (runtime_error): Use vsnprintf and estr_writev.
221         (runtime_error_at): Likewise.
222         (runtime_warning_at): Likewise.
223         (internal_error): Use estr_writev.
224         (generate_error_common): Likewise.
225         (generate_warning): Likewise.
226         (notify_std): Likewise.
227         * runtime/pause.c (pause_string): Likewise.
228         * runtime/stop.c (report_exception): Likewise.
229         (stop_string): Likewise.
230         (error_stop_string): Likewise.
232 2018-09-16  Thomas Koenig  <tkoenig@gcc.gnu.org>
234         PR fortran/37802
235         * m4/matmul_internal.m4: Adjust error messages.
236         * generated/matmul_c10.c: Regenerated.
237         * generated/matmul_c16.c: Regenerated.
238         * generated/matmul_c4.c: Regenerated.
239         * generated/matmul_c8.c: Regenerated.
240         * generated/matmul_i1.c: Regenerated.
241         * generated/matmul_i16.c: Regenerated.
242         * generated/matmul_i2.c: Regenerated.
243         * generated/matmul_i4.c: Regenerated.
244         * generated/matmul_i8.c: Regenerated.
245         * generated/matmul_r10.c: Regenerated.
246         * generated/matmul_r16.c: Regenerated.
247         * generated/matmul_r4.c: Regenerated.
248         * generated/matmul_r8.c: Regenerated.
249         * generated/matmulavx128_c10.c: Regenerated.
250         * generated/matmulavx128_c16.c: Regenerated.
251         * generated/matmulavx128_c4.c: Regenerated.
252         * generated/matmulavx128_c8.c: Regenerated.
253         * generated/matmulavx128_i1.c: Regenerated.
254         * generated/matmulavx128_i16.c: Regenerated.
255         * generated/matmulavx128_i2.c: Regenerated.
256         * generated/matmulavx128_i4.c: Regenerated.
257         * generated/matmulavx128_i8.c: Regenerated.
258         * generated/matmulavx128_r10.c: Regenerated.
259         * generated/matmulavx128_r16.c: Regenerated.
260         * generated/matmulavx128_r4.c: Regenerated.
261         * generated/matmulavx128_r8.c: Regenerated.
263 2018-09-14  Kyrylo Tkachov  <kyrylo.tkachov@arm.com>
265         * io/unix.c (fallback_access): Avoid calling close on
266         uninitialized file descriptor.
268 2018-09-12  Kwok Cheung Yeung  <kcy@codesourcery.com>
270         * runtime/minimal.c (estr_write): Define in terms of write.
272 2018-09-12  Andrew Stubbs  <ams@codesourcery.com>
274         * runtime/minimal.c (exit): Only work around nvptx bugs on nvptx.
276 2018-09-07  Janne Blomqvist  <jb@gcc.gnu.org>
278         * runtime/environ.c (init_unsigned_integer): Remove.
280 2018-09-05  Hans-Peter Nilsson  <hp@axis.com>
282         * io/async.h: Use __gthread_mutex_t, not pthread_mutex_t.
284 2018-09-01  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
286         * io/io.h: Change declaration of vlist type to
287         gfc_full_array_i4 to eliminate warning for mismatched type.
288         * io/format.c ((parse_format_list): Use gfc_full_array_i4.
289         * io/io.h: Use gfc_full_array_i4.
291 2018-08-25  Thomas Koenig  <tkoenig@gcc.gnu.org>
293         PR libfortran/86704
294         * m4/matmul_internal.m4: Correct calculation of needed buffer size
295         for arrays of shape (1,n).
296         * generated/matmul_c10.c: Regenerated
297         * generated/matmul_c16.c: Regenerated
298         * generated/matmul_c4.c: Regenerated
299         * generated/matmul_c8.c: Regenerated
300         * generated/matmul_i1.c: Regenerated
301         * generated/matmul_i16.c: Regenerated
302         * generated/matmul_i2.c: Regenerated
303         * generated/matmul_i4.c: Regenerated
304         * generated/matmul_i8.c: Regenerated
305         * generated/matmul_r10.c: Regenerated
306         * generated/matmul_r16.c: Regenerated
307         * generated/matmul_r4.c: Regenerated
308         * generated/matmul_r8.c: Regenerated
309         * generated/matmulavx128_c10.c: Regenerated
310         * generated/matmulavx128_c16.c: Regenerated
311         * generated/matmulavx128_c4.c: Regenerated
312         * generated/matmulavx128_c8.c: Regenerated
313         * generated/matmulavx128_i1.c: Regenerated
314         * generated/matmulavx128_i16.c: Regenerated
315         * generated/matmulavx128_i2.c: Regenerated
316         * generated/matmulavx128_i4.c: Regenerated
317         * generated/matmulavx128_i8.c: Regenerated
318         * generated/matmulavx128_r10.c: Regenerated
319         * generated/matmulavx128_r16.c: Regenerated
320         * generated/matmulavx128_r4.c: Regenerated
321         * generated/matmulavx128_r8.c: Regenerated
323 2018-08-23  David Edelsohn  <dje.gcc@gmail.com>
325         * async.h (ASYNC_IO): Revert _AIX test.
327 2018-08-22  Thomas Koenig  <tkoenig@gcc.gnu.org>
329         * async.h: Set ASYNC_IO to zero if _AIX is defined.
330         (struct adv_cond): If ASYNC_IO is zero, the struct has no members.
331         (async_unit): If ASYNC_IO is zero, remove unneeded members.
333 2018-08-21  Nicolas Koenig  <koenigni@gcc.gnu.org>
334         Thomas Koenig <tkoenig@gcc.gnu.org>
336         PR fortran/25829
337         * Makefile.am: Add async.c to gfor_io_src.
338         Add async.h to gfor_io_headers.
339         * Makefile.in: Regenerated.
340         * gfortran.map: Add _gfortran_st_wait_async.
341         * io/async.c: New file.
342         * io/async.h: New file.
343         * io/close.c: Include async.h.
344         (st_close): Call async_wait for an asynchronous unit.
345         * io/file_pos.c (st_backspace): Likewise.
346         (st_endfile): Likewise.
347         (st_rewind): Likewise.
348         (st_flush): Likewise.
349         * io/inquire.c: Add handling for asynchronous PENDING
350         and ID arguments.
351         * io/io.h (st_parameter_dt): Add async bit.
352         (st_parameter_wait): Correct.
353         (gfc_unit): Add au pointer.
354         (st_wait_async): Add prototype.
355         (transfer_array_inner): Likewise.
356         (st_write_done_worker): Likewise.
357         * io/open.c: Include async.h.
358         (new_unit): Initialize asynchronous unit.
359         * io/transfer.c (async_opt): New struct.
360         (wrap_scalar_transfer): New function.
361         (transfer_integer): Call wrap_scalar_transfer to do the work.
362         (transfer_real): Likewise.
363         (transfer_real_write): Likewise.
364         (transfer_character): Likewise.
365         (transfer_character_wide): Likewise.
366         (transfer_complex): Likewise.
367         (transfer_array_inner): New function.
368         (transfer_array): Call transfer_array_inner.
369         (transfer_derived): Call wrap_scalar_transfer.
370         (data_transfer_init): Check for asynchronous I/O.
371         Perform a wait operation on any pending asynchronous I/O
372         if the data transfer is synchronous. Copy PDT and enqueue
373         thread for data transfer.
374         (st_read_done_worker): New function.
375         (st_read_done): Enqueue transfer or call st_read_done_worker.
376         (st_write_done_worker): New function.
377         (st_write_done): Enqueue transfer or call st_read_done_worker.
378         (st_wait): Document as no-op for compatibility reasons.
379         (st_wait_async): New function.
380         * io/unit.c (insert_unit): Use macros LOCK, UNLOCK and TRYLOCK;
381         add NOTE where necessary.
382         (get_gfc_unit): Likewise.
383         (init_units): Likewise.
384         (close_unit_1): Likewise. Call async_close if asynchronous.
385         (close_unit): Use macros LOCK and UNLOCK.
386         (finish_last_advance_record): Likewise.
387         (newunit_alloc): Likewise.
388         * io/unix.c (find_file): Likewise.
389         (flush_all_units_1): Likewise.
390         (flush_all_units): Likewise.
391         * libgfortran.h (generate_error_common): Add prototype.
392         * runtime/error.c: Include io.h and async.h.
393         (generate_error_common): New function.
395 2018-08-15  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
397         * configure.ac: Check for <sys/random.h>.
398         * configure, config.h.in: Regenerate.
399         * intrinsics/random.c [HAVE_SYS_RANDOM_H]: Include <sys/random.h>.
401 2018-08-13  Janne Blomqvist  <jb@gcc.gnu.org>
403         * configure.ac: Check for getentropy.
404         * intrinsics/random.c (getosrandom): Use getentropy if available.
405         * config.h.in: Regenerated.
406         * configure: Regenerated.
408 2018-07-31  Andre Vieira  <andre.simoesdiasvieira@arm.com>
410         Revert 'AsyncI/O patch committed'
411         2018-07-25  Nicolas Koenig  <koenigni@gcc.gnu.org>
412                 Thomas Koenig <tkoenig@gcc.gnu.org>
414         PR fortran/25829
415         * Makefile.am: Add async.c to gfor_io_src.
416         Add async.h to gfor_io_headers.
417         * Makefile.in: Regenerated.
418         * gfortran.map: Add _gfortran_st_wait_async.
419         * io/async.c: New file.
420         * io/async.h: New file.
421         * io/close.c: Include async.h.
422         (st_close): Call async_wait for an asynchronous unit.
423         * io/file_pos.c (st_backspace): Likewise.
424         (st_endfile): Likewise.
425         (st_rewind): Likewise.
426         (st_flush): Likewise.
427         * io/inquire.c: Add handling for asynchronous PENDING
428         and ID arguments.
429         * io/io.h (st_parameter_dt): Add async bit.
430         (st_parameter_wait): Correct.
431         (gfc_unit): Add au pointer.
432         (st_wait_async): Add prototype.
433         (transfer_array_inner): Likewise.
434         (st_write_done_worker): Likewise.
435         * io/open.c: Include async.h.
436         (new_unit): Initialize asynchronous unit.
437         * io/transfer.c (async_opt): New struct.
438         (wrap_scalar_transfer): New function.
439         (transfer_integer): Call wrap_scalar_transfer to do the work.
440         (transfer_real): Likewise.
441         (transfer_real_write): Likewise.
442         (transfer_character): Likewise.
443         (transfer_character_wide): Likewise.
444         (transfer_complex): Likewise.
445         (transfer_array_inner): New function.
446         (transfer_array): Call transfer_array_inner.
447         (transfer_derived): Call wrap_scalar_transfer.
448         (data_transfer_init): Check for asynchronous I/O.
449         Perform a wait operation on any pending asynchronous I/O
450         if the data transfer is synchronous. Copy PDT and enqueue
451         thread for data transfer.
452         (st_read_done_worker): New function.
453         (st_read_done): Enqueue transfer or call st_read_done_worker.
454         (st_write_done_worker): New function.
455         (st_write_done): Enqueue transfer or call st_read_done_worker.
456         (st_wait): Document as no-op for compatibility reasons.
457         (st_wait_async): New function.
458         * io/unit.c (insert_unit): Use macros LOCK, UNLOCK and TRYLOCK;
459         add NOTE where necessary.
460         (get_gfc_unit): Likewise.
461         (init_units): Likewise.
462         (close_unit_1): Likewise. Call async_close if asynchronous.
463         (close_unit): Use macros LOCK and UNLOCK.
464         (finish_last_advance_record): Likewise.
465         (newunit_alloc): Likewise.
466         * io/unix.c (find_file): Likewise.
467         (flush_all_units_1): Likewise.
468         (flush_all_units): Likewise.
469         * libgfortran.h (generate_error_common): Add prototype.
470         * runtime/error.c: Include io.h and async.h.
471         (generate_error_common): New function.
473 2018-07-25  Nicolas Koenig  <koenigni@gcc.gnu.org>
474         Thomas Koenig <tkoenig@gcc.gnu.org>
476         PR fortran/25829
477         * Makefile.am: Add async.c to gfor_io_src.
478         Add async.h to gfor_io_headers.
479         * Makefile.in: Regenerated.
480         * gfortran.map: Add _gfortran_st_wait_async.
481         * io/async.c: New file.
482         * io/async.h: New file.
483         * io/close.c: Include async.h.
484         (st_close): Call async_wait for an asynchronous unit.
485         * io/file_pos.c (st_backspace): Likewise.
486         (st_endfile): Likewise.
487         (st_rewind): Likewise.
488         (st_flush): Likewise.
489         * io/inquire.c: Add handling for asynchronous PENDING
490         and ID arguments.
491         * io/io.h (st_parameter_dt): Add async bit.
492         (st_parameter_wait): Correct.
493         (gfc_unit): Add au pointer.
494         (st_wait_async): Add prototype.
495         (transfer_array_inner): Likewise.
496         (st_write_done_worker): Likewise.
497         * io/open.c: Include async.h.
498         (new_unit): Initialize asynchronous unit.
499         * io/transfer.c (async_opt): New struct.
500         (wrap_scalar_transfer): New function.
501         (transfer_integer): Call wrap_scalar_transfer to do the work.
502         (transfer_real): Likewise.
503         (transfer_real_write): Likewise.
504         (transfer_character): Likewise.
505         (transfer_character_wide): Likewise.
506         (transfer_complex): Likewise.
507         (transfer_array_inner): New function.
508         (transfer_array): Call transfer_array_inner.
509         (transfer_derived): Call wrap_scalar_transfer.
510         (data_transfer_init): Check for asynchronous I/O.
511         Perform a wait operation on any pending asynchronous I/O
512         if the data transfer is synchronous. Copy PDT and enqueue
513         thread for data transfer.
514         (st_read_done_worker): New function.
515         (st_read_done): Enqueue transfer or call st_read_done_worker.
516         (st_write_done_worker): New function.
517         (st_write_done): Enqueue transfer or call st_read_done_worker.
518         (st_wait): Document as no-op for compatibility reasons.
519         (st_wait_async): New function.
520         * io/unit.c (insert_unit): Use macros LOCK, UNLOCK and TRYLOCK;
521         add NOTE where necessary.
522         (get_gfc_unit): Likewise.
523         (init_units): Likewise.
524         (close_unit_1): Likewise. Call async_close if asynchronous.
525         (close_unit): Use macros LOCK and UNLOCK.
526         (finish_last_advance_record): Likewise.
527         (newunit_alloc): Likewise.
528         * io/unix.c (find_file): Likewise.
529         (flush_all_units_1): Likewise.
530         (flush_all_units): Likewise.
531         * libgfortran.h (generate_error_common): Add prototype.
532         * runtime/error.c: Include io.h and async.h.
533         (generate_error_common): New function.
535 2018-06-09  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
537         PR libgfortran/86070
538         * io/write_float.def (build_float_string): Initialize *len.
540 2018-06-01  Steven G. Kargl  <kargl@gcc.gnu.org>
542         PR fortran/85816
543         PR fortran/85975
544         * libgfortran.h: Remove the GFC_DTYPE_COPY_SETRANK macro.
545         * intrinsics/reshape_generic.c: Directly assign rank.
546         * intrinsics/spread_generic.c: Ditto.
547         * m4/iforeach-s.m4: Ditto.
548         * m4/iforeach.m4: Ditto.
549         * m4/ifunction-s.m4: Ditto.
550         * m4/ifunction-s2.m4: Ditto.
551         * m4/ifunction.m4: Ditto.
552         * m4/ifunction_logical.m4: Ditto.
553         * m4/reshape.m4: Ditto.
554         * m4/spread.m4: Ditto.
555         * generated/all_l1.c: Regenerated from m4 files.
556         * generated/all_l16.c: Ditto.
557         * generated/all_l2.c: Ditto.
558         * generated/all_l4.c: Ditto.
559         * generated/all_l8.c: Ditto.
560         * generated/any_l1.c: Ditto.
561         * generated/any_l16.c: Ditto.
562         * generated/any_l2.c: Ditto.
563         * generated/any_l4.c: Ditto.
564         * generated/any_l8.c: Ditto.
565         * generated/count_16_l.c: Ditto.
566         * generated/count_1_l.c: Ditto.
567         * generated/count_2_l.c: Ditto.
568         * generated/count_4_l.c: Ditto.
569         * generated/count_8_l.c: Ditto.
570         * generated/iall_i1.c: Ditto.
571         * generated/iall_i16.c: Ditto.
572         * generated/iall_i2.c: Ditto.
573         * generated/iall_i4.c: Ditto.
574         * generated/iall_i8.c: Ditto.
575         * generated/iany_i1.c: Ditto.
576         * generated/iany_i16.c: Ditto.
577         * generated/iany_i2.c: Ditto.
578         * generated/iany_i4.c: Ditto.
579         * generated/iany_i8.c: Ditto.
580         * generated/iparity_i1.c: Ditto.
581         * generated/iparity_i16.c: Ditto.
582         * generated/iparity_i2.c: Ditto.
583         * generated/iparity_i4.c: Ditto.
584         * generated/iparity_i8.c: Ditto.
585         * generated/maxloc0_16_i1.c: Ditto.
586         * generated/maxloc0_16_i16.c: Ditto.
587         * generated/maxloc0_16_i2.c: Ditto.
588         * generated/maxloc0_16_i4.c: Ditto.
589         * generated/maxloc0_16_i8.c: Ditto.
590         * generated/maxloc0_16_r10.c: Ditto.
591         * generated/maxloc0_16_r16.c: Ditto.
592         * generated/maxloc0_16_r4.c: Ditto.
593         * generated/maxloc0_16_r8.c: Ditto.
594         * generated/maxloc0_16_s1.c: Ditto.
595         * generated/maxloc0_16_s4.c: Ditto.
596         * generated/maxloc0_4_i1.c: Ditto.
597         * generated/maxloc0_4_i16.c: Ditto.
598         * generated/maxloc0_4_i2.c: Ditto.
599         * generated/maxloc0_4_i4.c: Ditto.
600         * generated/maxloc0_4_i8.c: Ditto.
601         * generated/maxloc0_4_r10.c: Ditto.
602         * generated/maxloc0_4_r16.c: Ditto.
603         * generated/maxloc0_4_r4.c: Ditto.
604         * generated/maxloc0_4_r8.c: Ditto.
605         * generated/maxloc0_4_s1.c: Ditto.
606         * generated/maxloc0_4_s4.c: Ditto.
607         * generated/maxloc0_8_i1.c: Ditto.
608         * generated/maxloc0_8_i16.c: Ditto.
609         * generated/maxloc0_8_i2.c: Ditto.
610         * generated/maxloc0_8_i4.c: Ditto.
611         * generated/maxloc0_8_i8.c: Ditto.
612         * generated/maxloc0_8_r10.c: Ditto.
613         * generated/maxloc0_8_r16.c: Ditto.
614         * generated/maxloc0_8_r4.c: Ditto.
615         * generated/maxloc0_8_r8.c: Ditto.
616         * generated/maxloc0_8_s1.c: Ditto.
617         * generated/maxloc0_8_s4.c: Ditto.
618         * generated/maxloc1_16_i1.c: Ditto.
619         * generated/maxloc1_16_i16.c: Ditto.
620         * generated/maxloc1_16_i2.c: Ditto.
621         * generated/maxloc1_16_i4.c: Ditto.
622         * generated/maxloc1_16_i8.c: Ditto.
623         * generated/maxloc1_16_r10.c: Ditto.
624         * generated/maxloc1_16_r16.c: Ditto.
625         * generated/maxloc1_16_r4.c: Ditto.
626         * generated/maxloc1_16_r8.c: Ditto.
627         * generated/maxloc1_16_s1.c: Ditto.
628         * generated/maxloc1_16_s4.c: Ditto.
629         * generated/maxloc1_4_i1.c: Ditto.
630         * generated/maxloc1_4_i16.c: Ditto.
631         * generated/maxloc1_4_i2.c: Ditto.
632         * generated/maxloc1_4_i4.c: Ditto.
633         * generated/maxloc1_4_i8.c: Ditto.
634         * generated/maxloc1_4_r10.c: Ditto.
635         * generated/maxloc1_4_r16.c: Ditto.
636         * generated/maxloc1_4_r4.c: Ditto.
637         * generated/maxloc1_4_r8.c: Ditto.
638         * generated/maxloc1_4_s1.c: Ditto.
639         * generated/maxloc1_4_s4.c: Ditto.
640         * generated/maxloc1_8_i1.c: Ditto.
641         * generated/maxloc1_8_i16.c: Ditto.
642         * generated/maxloc1_8_i2.c: Ditto.
643         * generated/maxloc1_8_i4.c: Ditto.
644         * generated/maxloc1_8_i8.c: Ditto.
645         * generated/maxloc1_8_r10.c: Ditto.
646         * generated/maxloc1_8_r16.c: Ditto.
647         * generated/maxloc1_8_r4.c: Ditto.
648         * generated/maxloc1_8_r8.c: Ditto.
649         * generated/maxloc1_8_s1.c: Ditto.
650         * generated/maxloc1_8_s4.c: Ditto.
651         * generated/maxval1_s1.c: Ditto.
652         * generated/maxval1_s4.c: Ditto.
653         * generated/maxval_i1.c: Ditto.
654         * generated/maxval_i16.c: Ditto.
655         * generated/maxval_i2.c: Ditto.
656         * generated/maxval_i4.c: Ditto.
657         * generated/maxval_i8.c: Ditto.
658         * generated/maxval_r10.c: Ditto.
659         * generated/maxval_r16.c: Ditto.
660         * generated/maxval_r4.c: Ditto.
661         * generated/maxval_r8.c: Ditto.
662         * generated/minloc0_16_i1.c: Ditto.
663         * generated/minloc0_16_i16.c: Ditto.
664         * generated/minloc0_16_i2.c: Ditto.
665         * generated/minloc0_16_i4.c: Ditto.
666         * generated/minloc0_16_i8.c: Ditto.
667         * generated/minloc0_16_r10.c: Ditto.
668         * generated/minloc0_16_r16.c: Ditto.
669         * generated/minloc0_16_r4.c: Ditto.
670         * generated/minloc0_16_r8.c: Ditto.
671         * generated/minloc0_16_s1.c: Ditto.
672         * generated/minloc0_16_s4.c: Ditto.
673         * generated/minloc0_4_i1.c: Ditto.
674         * generated/minloc0_4_i16.c: Ditto.
675         * generated/minloc0_4_i2.c: Ditto.
676         * generated/minloc0_4_i4.c: Ditto.
677         * generated/minloc0_4_i8.c: Ditto.
678         * generated/minloc0_4_r10.c: Ditto.
679         * generated/minloc0_4_r16.c: Ditto.
680         * generated/minloc0_4_r4.c: Ditto.
681         * generated/minloc0_4_r8.c: Ditto.
682         * generated/minloc0_4_s1.c: Ditto.
683         * generated/minloc0_4_s4.c: Ditto.
684         * generated/minloc0_8_i1.c: Ditto.
685         * generated/minloc0_8_i16.c: Ditto.
686         * generated/minloc0_8_i2.c: Ditto.
687         * generated/minloc0_8_i4.c: Ditto.
688         * generated/minloc0_8_i8.c: Ditto.
689         * generated/minloc0_8_r10.c: Ditto.
690         * generated/minloc0_8_r16.c: Ditto.
691         * generated/minloc0_8_r4.c: Ditto.
692         * generated/minloc0_8_r8.c: Ditto.
693         * generated/minloc0_8_s1.c: Ditto.
694         * generated/minloc0_8_s4.c: Ditto.
695         * generated/minloc1_16_i1.c: Ditto.
696         * generated/minloc1_16_i16.c: Ditto.
697         * generated/minloc1_16_i2.c: Ditto.
698         * generated/minloc1_16_i4.c: Ditto.
699         * generated/minloc1_16_i8.c: Ditto.
700         * generated/minloc1_16_r10.c: Ditto.
701         * generated/minloc1_16_r16.c: Ditto.
702         * generated/minloc1_16_r4.c: Ditto.
703         * generated/minloc1_16_r8.c: Ditto.
704         * generated/minloc1_16_s1.c: Ditto.
705         * generated/minloc1_16_s4.c: Ditto.
706         * generated/minloc1_4_i1.c: Ditto.
707         * generated/minloc1_4_i16.c: Ditto.
708         * generated/minloc1_4_i2.c: Ditto.
709         * generated/minloc1_4_i4.c: Ditto.
710         * generated/minloc1_4_i8.c: Ditto.
711         * generated/minloc1_4_r10.c: Ditto.
712         * generated/minloc1_4_r16.c: Ditto.
713         * generated/minloc1_4_r4.c: Ditto.
714         * generated/minloc1_4_r8.c: Ditto.
715         * generated/minloc1_4_s1.c: Ditto.
716         * generated/minloc1_4_s4.c: Ditto.
717         * generated/minloc1_8_i1.c: Ditto.
718         * generated/minloc1_8_i16.c: Ditto.
719         * generated/minloc1_8_i2.c: Ditto.
720         * generated/minloc1_8_i4.c: Ditto.
721         * generated/minloc1_8_i8.c: Ditto.
722         * generated/minloc1_8_r10.c: Ditto.
723         * generated/minloc1_8_r16.c: Ditto.
724         * generated/minloc1_8_r4.c: Ditto.
725         * generated/minloc1_8_r8.c: Ditto.
726         * generated/minloc1_8_s1.c: Ditto.
727         * generated/minloc1_8_s4.c: Ditto.
728         * generated/minval1_s1.c: Ditto.
729         * generated/minval1_s4.c: Ditto.
730         * generated/minval_i1.c: Ditto.
731         * generated/minval_i16.c: Ditto.
732         * generated/minval_i2.c: Ditto.
733         * generated/minval_i4.c: Ditto.
734         * generated/minval_i8.c: Ditto.
735         * generated/minval_r10.c: Ditto.
736         * generated/minval_r16.c: Ditto.
737         * generated/minval_r4.c: Ditto.
738         * generated/minval_r8.c: Ditto.
739         * generated/norm2_r10.c: Ditto.
740         * generated/norm2_r16.c: Ditto.
741         * generated/norm2_r4.c: Ditto.
742         * generated/norm2_r8.c: Ditto.
743         * generated/parity_l1.c: Ditto.
744         * generated/parity_l16.c: Ditto.
745         * generated/parity_l2.c: Ditto.
746         * generated/parity_l4.c: Ditto.
747         * generated/parity_l8.c: Ditto.
748         * generated/product_c10.c: Ditto.
749         * generated/product_c16.c: Ditto.
750         * generated/product_c4.c: Ditto.
751         * generated/product_c8.c: Ditto.
752         * generated/product_i1.c: Ditto.
753         * generated/product_i16.c: Ditto.
754         * generated/product_i2.c: Ditto.
755         * generated/product_i4.c: Ditto.
756         * generated/product_i8.c: Ditto.
757         * generated/product_r10.c: Ditto.
758         * generated/product_r16.c: Ditto.
759         * generated/product_r4.c: Ditto.
760         * generated/product_r8.c: Ditto.
761         * generated/reshape_c10.c: Ditto.
762         * generated/reshape_c16.c: Ditto.
763         * generated/reshape_c4.c: Ditto.
764         * generated/reshape_c8.c: Ditto.
765         * generated/reshape_i16.c: Ditto.
766         * generated/reshape_i4.c: Ditto.
767         * generated/reshape_i8.c: Ditto.
768         * generated/reshape_r10.c: Ditto.
769         * generated/reshape_r16.c: Ditto.
770         * generated/reshape_r4.c: Ditto.
771         * generated/reshape_r8.c: Ditto.
772         * generated/spread_c10.c: Ditto.
773         * generated/spread_c16.c: Ditto.
774         * generated/spread_c4.c: Ditto.
775         * generated/spread_c8.c: Ditto.
776         * generated/spread_i1.c: Ditto.
777         * generated/spread_i16.c: Ditto.
778         * generated/spread_i2.c: Ditto.
779         * generated/spread_i4.c: Ditto.
780         * generated/spread_i8.c: Ditto.
781         * generated/spread_r10.c: Ditto.
782         * generated/spread_r16.c: Ditto.
783         * generated/spread_r4.c: Ditto.
784         * generated/spread_r8.c: Ditto.
785         * generated/sum_c10.c: Ditto.
786         * generated/sum_c16.c: Ditto.
787         * generated/sum_c4.c: Ditto.
788         * generated/sum_c8.c: Ditto.
789         * generated/sum_i1.c: Ditto.
790         * generated/sum_i16.c: Ditto.
791         * generated/sum_i2.c: Ditto.
792         * generated/sum_i4.c: Ditto.
793         * generated/sum_i8.c: Ditto.
794         * generated/sum_r10.c: Ditto.
795         * generated/sum_r16.c: Ditto.
796         * generated/sum_r4.c: Ditto.
797         * generated/sum_r8.c: Ditto.
799 2018-06-01  Steven G. Kargl  <kargl@gcc.gnu.org>
801         PR fortran/63570
802         * libgfortran/Makefile.am: Add random_init.f90 to build.
803         * libgfortran/Makefile.in: Regenerated.
804         * libgfortran/gfortran.map: Expose symbol for _gfortran_random_init.
805         * libgfortran/intrinsics/random_init.f90: Implementation.
807 2018-05-28  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
809         PR libgfortran/85840
810         * io/write.c (write_real, write_real_g0, write_complex): Use
811         separate local variables for the float string length.
813 2018-05-26  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
815         PR libgfortran/85906
816         * io/write.c (write_integer): Initialise the fnode format to
817         FMT_NONE, used for list directed write.
818         (BUF_STACK_SZ): Bump default buffer size up to avoid allocs on
819         small stuff.
821 2018-05-26  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
823         PR libgfortran/85840
824         * io/write.c (write_float_0): Use separate local variable for
825         the float string length.
827 2018-05-08  Thomas Koenig  <tkoenig@gcc.gnu.org>
829         PR fortran/54613
830         * m4/iforeach-s.m4: Remove assertion that back is zero.
831         * m4/iforeach.m4: Likewise.  Remove leading 'do'
832         before implementation start.
833         * m4/ifunction-s.m4: Remove assertion that back is zero.
834         * m4/ifunction.m4: Likewise.  Remove for loop if HAVE_BACK_ARG
835         is defined.
836         * m4/maxloc0.m4: Reorganize loops. Split loops between >= and =,
837         depending if back is true.  Mark the condition of having
838         found a value which exceeds the limit as unlikely.
839         * m4/minloc0.m4: Likewise.
840         * m4/maxloc1.m4: Likewise.
841         * m4/minloc1.m4: Likewise.
842         * m4/maxloc1s.m4: Handle back argument.
843         * m4/minloc1s.m4: Likewise.
844         * m4/maxloc2s.m4: Remove assertion that back is zero.
845         Remove special handling of loop start. Handle back argument.
846         * m4/minloc2s.m4: Likewise.
847         * generated/iall_i1.c: Regenerated.
848         * generated/iall_i16.c: Regenerated.
849         * generated/iall_i2.c: Regenerated.
850         * generated/iall_i4.c: Regenerated.
851         * generated/iall_i8.c: Regenerated.
852         * generated/iany_i1.c: Regenerated.
853         * generated/iany_i16.c: Regenerated.
854         * generated/iany_i2.c: Regenerated.
855         * generated/iany_i4.c: Regenerated.
856         * generated/iany_i8.c: Regenerated.
857         * generated/iparity_i1.c: Regenerated.
858         * generated/iparity_i16.c: Regenerated.
859         * generated/iparity_i2.c: Regenerated.
860         * generated/iparity_i4.c: Regenerated.
861         * generated/iparity_i8.c: Regenerated.
862         * generated/maxloc0_16_i1.c: Regenerated.
863         * generated/maxloc0_16_i16.c: Regenerated.
864         * generated/maxloc0_16_i2.c: Regenerated.
865         * generated/maxloc0_16_i4.c: Regenerated.
866         * generated/maxloc0_16_i8.c: Regenerated.
867         * generated/maxloc0_16_r10.c: Regenerated.
868         * generated/maxloc0_16_r16.c: Regenerated.
869         * generated/maxloc0_16_r4.c: Regenerated.
870         * generated/maxloc0_16_r8.c: Regenerated.
871         * generated/maxloc0_16_s1.c: Regenerated.
872         * generated/maxloc0_16_s4.c: Regenerated.
873         * generated/maxloc0_4_i1.c: Regenerated.
874         * generated/maxloc0_4_i16.c: Regenerated.
875         * generated/maxloc0_4_i2.c: Regenerated.
876         * generated/maxloc0_4_i4.c: Regenerated.
877         * generated/maxloc0_4_i8.c: Regenerated.
878         * generated/maxloc0_4_r10.c: Regenerated.
879         * generated/maxloc0_4_r16.c: Regenerated.
880         * generated/maxloc0_4_r4.c: Regenerated.
881         * generated/maxloc0_4_r8.c: Regenerated.
882         * generated/maxloc0_4_s1.c: Regenerated.
883         * generated/maxloc0_4_s4.c: Regenerated.
884         * generated/maxloc0_8_i1.c: Regenerated.
885         * generated/maxloc0_8_i16.c: Regenerated.
886         * generated/maxloc0_8_i2.c: Regenerated.
887         * generated/maxloc0_8_i4.c: Regenerated.
888         * generated/maxloc0_8_i8.c: Regenerated.
889         * generated/maxloc0_8_r10.c: Regenerated.
890         * generated/maxloc0_8_r16.c: Regenerated.
891         * generated/maxloc0_8_r4.c: Regenerated.
892         * generated/maxloc0_8_r8.c: Regenerated.
893         * generated/maxloc0_8_s1.c: Regenerated.
894         * generated/maxloc0_8_s4.c: Regenerated.
895         * generated/maxloc1_16_i1.c: Regenerated.
896         * generated/maxloc1_16_i16.c: Regenerated.
897         * generated/maxloc1_16_i2.c: Regenerated.
898         * generated/maxloc1_16_i4.c: Regenerated.
899         * generated/maxloc1_16_i8.c: Regenerated.
900         * generated/maxloc1_16_r10.c: Regenerated.
901         * generated/maxloc1_16_r16.c: Regenerated.
902         * generated/maxloc1_16_r4.c: Regenerated.
903         * generated/maxloc1_16_r8.c: Regenerated.
904         * generated/maxloc1_16_s1.c: Regenerated.
905         * generated/maxloc1_16_s4.c: Regenerated.
906         * generated/maxloc1_4_i1.c: Regenerated.
907         * generated/maxloc1_4_i16.c: Regenerated.
908         * generated/maxloc1_4_i2.c: Regenerated.
909         * generated/maxloc1_4_i4.c: Regenerated.
910         * generated/maxloc1_4_i8.c: Regenerated.
911         * generated/maxloc1_4_r10.c: Regenerated.
912         * generated/maxloc1_4_r16.c: Regenerated.
913         * generated/maxloc1_4_r4.c: Regenerated.
914         * generated/maxloc1_4_r8.c: Regenerated.
915         * generated/maxloc1_4_s1.c: Regenerated.
916         * generated/maxloc1_4_s4.c: Regenerated.
917         * generated/maxloc1_8_i1.c: Regenerated.
918         * generated/maxloc1_8_i16.c: Regenerated.
919         * generated/maxloc1_8_i2.c: Regenerated.
920         * generated/maxloc1_8_i4.c: Regenerated.
921         * generated/maxloc1_8_i8.c: Regenerated.
922         * generated/maxloc1_8_r10.c: Regenerated.
923         * generated/maxloc1_8_r16.c: Regenerated.
924         * generated/maxloc1_8_r4.c: Regenerated.
925         * generated/maxloc1_8_r8.c: Regenerated.
926         * generated/maxloc1_8_s1.c: Regenerated.
927         * generated/maxloc1_8_s4.c: Regenerated.
928         * generated/maxloc2_16_s1.c: Regenerated.
929         * generated/maxloc2_16_s4.c: Regenerated.
930         * generated/maxloc2_4_s1.c: Regenerated.
931         * generated/maxloc2_4_s4.c: Regenerated.
932         * generated/maxloc2_8_s1.c: Regenerated.
933         * generated/maxloc2_8_s4.c: Regenerated.
934         * generated/maxval_i1.c: Regenerated.
935         * generated/maxval_i16.c: Regenerated.
936         * generated/maxval_i2.c: Regenerated.
937         * generated/maxval_i4.c: Regenerated.
938         * generated/maxval_i8.c: Regenerated.
939         * generated/maxval_r10.c: Regenerated.
940         * generated/maxval_r16.c: Regenerated.
941         * generated/maxval_r4.c: Regenerated.
942         * generated/maxval_r8.c: Regenerated.
943         * generated/minloc0_16_i1.c: Regenerated.
944         * generated/minloc0_16_i16.c: Regenerated.
945         * generated/minloc0_16_i2.c: Regenerated.
946         * generated/minloc0_16_i4.c: Regenerated.
947         * generated/minloc0_16_i8.c: Regenerated.
948         * generated/minloc0_16_r10.c: Regenerated.
949         * generated/minloc0_16_r16.c: Regenerated.
950         * generated/minloc0_16_r4.c: Regenerated.
951         * generated/minloc0_16_r8.c: Regenerated.
952         * generated/minloc0_16_s1.c: Regenerated.
953         * generated/minloc0_16_s4.c: Regenerated.
954         * generated/minloc0_4_i1.c: Regenerated.
955         * generated/minloc0_4_i16.c: Regenerated.
956         * generated/minloc0_4_i2.c: Regenerated.
957         * generated/minloc0_4_i4.c: Regenerated.
958         * generated/minloc0_4_i8.c: Regenerated.
959         * generated/minloc0_4_r10.c: Regenerated.
960         * generated/minloc0_4_r16.c: Regenerated.
961         * generated/minloc0_4_r4.c: Regenerated.
962         * generated/minloc0_4_r8.c: Regenerated.
963         * generated/minloc0_4_s1.c: Regenerated.
964         * generated/minloc0_4_s4.c: Regenerated.
965         * generated/minloc0_8_i1.c: Regenerated.
966         * generated/minloc0_8_i16.c: Regenerated.
967         * generated/minloc0_8_i2.c: Regenerated.
968         * generated/minloc0_8_i4.c: Regenerated.
969         * generated/minloc0_8_i8.c: Regenerated.
970         * generated/minloc0_8_r10.c: Regenerated.
971         * generated/minloc0_8_r16.c: Regenerated.
972         * generated/minloc0_8_r4.c: Regenerated.
973         * generated/minloc0_8_r8.c: Regenerated.
974         * generated/minloc0_8_s1.c: Regenerated.
975         * generated/minloc0_8_s4.c: Regenerated.
976         * generated/minloc1_16_i1.c: Regenerated.
977         * generated/minloc1_16_i16.c: Regenerated.
978         * generated/minloc1_16_i2.c: Regenerated.
979         * generated/minloc1_16_i4.c: Regenerated.
980         * generated/minloc1_16_i8.c: Regenerated.
981         * generated/minloc1_16_r10.c: Regenerated.
982         * generated/minloc1_16_r16.c: Regenerated.
983         * generated/minloc1_16_r4.c: Regenerated.
984         * generated/minloc1_16_r8.c: Regenerated.
985         * generated/minloc1_16_s1.c: Regenerated.
986         * generated/minloc1_16_s4.c: Regenerated.
987         * generated/minloc1_4_i1.c: Regenerated.
988         * generated/minloc1_4_i16.c: Regenerated.
989         * generated/minloc1_4_i2.c: Regenerated.
990         * generated/minloc1_4_i4.c: Regenerated.
991         * generated/minloc1_4_i8.c: Regenerated.
992         * generated/minloc1_4_r10.c: Regenerated.
993         * generated/minloc1_4_r16.c: Regenerated.
994         * generated/minloc1_4_r4.c: Regenerated.
995         * generated/minloc1_4_r8.c: Regenerated.
996         * generated/minloc1_4_s1.c: Regenerated.
997         * generated/minloc1_4_s4.c: Regenerated.
998         * generated/minloc1_8_i1.c: Regenerated.
999         * generated/minloc1_8_i16.c: Regenerated.
1000         * generated/minloc1_8_i2.c: Regenerated.
1001         * generated/minloc1_8_i4.c: Regenerated.
1002         * generated/minloc1_8_i8.c: Regenerated.
1003         * generated/minloc1_8_r10.c: Regenerated.
1004         * generated/minloc1_8_r16.c: Regenerated.
1005         * generated/minloc1_8_r4.c: Regenerated.
1006         * generated/minloc1_8_r8.c: Regenerated.
1007         * generated/minloc1_8_s1.c: Regenerated.
1008         * generated/minloc1_8_s4.c: Regenerated.
1009         * generated/minloc2_16_s1.c: Regenerated.
1010         * generated/minloc2_16_s4.c: Regenerated.
1011         * generated/minloc2_4_s1.c: Regenerated.
1012         * generated/minloc2_4_s4.c: Regenerated.
1013         * generated/minloc2_8_s1.c: Regenerated.
1014         * generated/minloc2_8_s4.c: Regenerated.
1015         * generated/minval_i1.c: Regenerated.
1016         * generated/minval_i16.c: Regenerated.
1017         * generated/minval_i2.c: Regenerated.
1018         * generated/minval_i4.c: Regenerated.
1019         * generated/minval_i8.c: Regenerated.
1020         * generated/minval_r10.c: Regenerated.
1021         * generated/minval_r16.c: Regenerated.
1022         * generated/minval_r4.c: Regenerated.
1023         * generated/minval_r8.c: Regenerated.
1024         * generated/norm2_r10.c: Regenerated.
1025         * generated/norm2_r16.c: Regenerated.
1026         * generated/norm2_r4.c: Regenerated.
1027         * generated/norm2_r8.c: Regenerated.
1028         * generated/parity_l1.c: Regenerated.
1029         * generated/parity_l16.c: Regenerated.
1030         * generated/parity_l2.c: Regenerated.
1031         * generated/parity_l4.c: Regenerated.
1032         * generated/parity_l8.c: Regenerated.
1033         * generated/product_c10.c: Regenerated.
1034         * generated/product_c16.c: Regenerated.
1035         * generated/product_c4.c: Regenerated.
1036         * generated/product_c8.c: Regenerated.
1037         * generated/product_i1.c: Regenerated.
1038         * generated/product_i16.c: Regenerated.
1039         * generated/product_i2.c: Regenerated.
1040         * generated/product_i4.c: Regenerated.
1041         * generated/product_i8.c: Regenerated.
1042         * generated/product_r10.c: Regenerated.
1043         * generated/product_r16.c: Regenerated.
1044         * generated/product_r4.c: Regenerated.
1045         * generated/product_r8.c: Regenerated.
1046         * generated/sum_c10.c: Regenerated.
1047         * generated/sum_c16.c: Regenerated.
1048         * generated/sum_c4.c: Regenerated.
1049         * generated/sum_c8.c: Regenerated.
1050         * generated/sum_i1.c: Regenerated.
1051         * generated/sum_i16.c: Regenerated.
1052         * generated/sum_i2.c: Regenerated.
1053         * generated/sum_i4.c: Regenerated.
1054         * generated/sum_i8.c: Regenerated.
1055         * generated/sum_r10.c: Regenerated.
1056         * generated/sum_r16.c: Regenerated.
1057         * generated/sum_r4.c: Regenerated.
1058         * generated/sum_r8.c: Regenerated.
1060 2018-04-24  H.J. Lu  <hongjiu.lu@intel.com>
1062         * configure: Regenerated.
1064 2018-04-19  Thomas Schwinge  <thomas@codesourcery.com>
1066         PR libfortran/85166
1067         PR libgomp/85463
1068         * runtime/minimal.c (stop_numeric): Reimplement.
1069         (stop_string, error_stop_string, error_stop_numeric): New
1070         functions.
1072 2018-04-19  Jakub Jelinek  <jakub@redhat.com>
1074         * configure: Regenerated.
1076 2018-04-18  David Malcolm  <dmalcolm@redhat.com>
1078         PR jit/85384
1079         * configure: Regenerate.
1081 2018-04-06  Thomas Koenig  <tkoenig@gcc.gnu.org>
1083         PR libfortran/85253
1084         * m4/matmul_internal.m4: If ycount == 1, add one more row to
1085         the internal buffer.
1086         * generated/matmul_c10.c: Regenerated.
1087         * generated/matmul_c16.c: Regenerated.
1088         * generated/matmul_c4.c: Regenerated.
1089         * generated/matmul_c8.c: Regenerated.
1090         * generated/matmul_i1.c: Regenerated.
1091         * generated/matmul_i16.c: Regenerated.
1092         * generated/matmul_i2.c: Regenerated.
1093         * generated/matmul_i4.c: Regenerated.
1094         * generated/matmul_i8.c: Regenerated.
1095         * generated/matmul_r10.c: Regenerated.
1096         * generated/matmul_r16.c: Regenerated.
1097         * generated/matmul_r4.c: Regenerated.
1098         * generated/matmul_r8.c: Regenerated.
1099         * generated/matmulavx128_c10.c: Regenerated.
1100         * generated/matmulavx128_c16.c: Regenerated.
1101         * generated/matmulavx128_c4.c: Regenerated.
1102         * generated/matmulavx128_c8.c: Regenerated.
1103         * generated/matmulavx128_i1.c: Regenerated.
1104         * generated/matmulavx128_i16.c: Regenerated.
1105         * generated/matmulavx128_i2.c: Regenerated.
1106         * generated/matmulavx128_i4.c: Regenerated.
1107         * generated/matmulavx128_i8.c: Regenerated.
1108         * generated/matmulavx128_r10.c: Regenerated.
1109         * generated/matmulavx128_r16.c: Regenerated.
1110         * generated/matmulavx128_r4.c: Regenerated.
1111         * generated/matmulavx128_r8.c: Regenerated.
1113 2018-04-04  Thomas Koenig  <tkoenig@gcc.gnu.org>
1115         PR libfortran/85166
1116         * runtime/minimal.c (stop_numeric): Add new function in order to
1117         implement numeric stop on minimal targets.
1119 2018-03-28  Jakub Jelinek  <jakub@redhat.com>
1121         * io/io.h (IOPARM_DT_DEFAULT_EXP): Rename to ...
1122         (IOPARM_DT_DEC_EXT): ... this.
1123         * io/list_read.c (parse_real): Adjust for IOPARM_DT_DEFAULT_EXP
1124         renaming to IOPARM_DT_DEC_EXT.
1125         (read_real): Likewise.
1126         * io/read.c (read_f): Likewise.
1128 2018-03-15  Jakub Jelinek  <jakub@redhat.com>
1130         PR libgfortran/84880
1131         * intrinsics/kill.c (kill): Rename to...
1132         (PREFIX (kill)): ... this.  Use export_proto_np instead of export_proto.
1134 2018-03-13  Steven G. Kargl  <kargl@gcc.gnu.org>
1136         * libgfortran/gfortran.map: Remove _gfortran_kill_i4,
1137         _gfortran_kill_i4_sub, _gfortran_kill_i8, and _gfortran_kill_i8_sub.
1138         Add _gfortran_kill and _gfortran_kill_sub.
1139         * libgfortran/intrinsics/kill.c: Eliminate _gfortran_kill_i4,
1140         _gfortran_kill_i4_sub, _gfortran_kill_i8, and _gfortran_kill_i8_sub.
1141         Add _gfortran_kill and _gfortran_kill_sub.
1143 2018-02-23  Janne Blomqvist  <jb@gcc.gnu.org>
1145         PR fortran/84519
1146         * caf/libcaf.h (_gfortran_caf_stop_numeric): Add bool argument.
1147         (_gfortran_caf_stop_str): Likewise.
1148         (_gfortran_caf_error_stop_str): Likewise.
1149         (_gfortran_caf_error_stop): Likewise.
1150         * caf/mpi.c (_gfortran_caf_error_stop_str): Handle new argument.
1151         (_gfortran_caf_error_stop): Likewise.
1152         * caf/single.c (_gfortran_caf_stop_numeric): Likewise.
1153         (_gfortran_caf_stop_str): Likewise.
1154         (_gfortran_caf_error_stop_str): Likewise.
1155         (_gfortran_caf_error_stop): Likewise.
1156         (_gfortran_caf_lock): Likewise.
1157         (_gfortran_caf_unlock): Likewise.
1158         * libgfortran.h (stop_string): Add bool argument.
1159         * runtime/pause.c (do_pause): Add false argument.
1160         * runtime/stop.c (stop_numeric): Handle new argument.
1161         (stop_string): Likewise.
1162         (error_stop_string): Likewise.
1163         (error_stop_numeric): Likewise.
1165 2018-02-22  Janne Blomqvist  <jb@gcc.gnu.org>
1167         PR 78534
1168         PR 84509
1169         * runtime/pause.c (pause_numeric): Modify to take GFC_INTEGER_8
1170         argument.
1171         (pause_string): Modify to take size_t character length argument.
1173 2018-02-22  Janne Blomqvist  <jb@gcc.gnu.org>
1175         * libgfortran.h (stop_string): Use size_t for character length.
1176         * runtime/stop.c (stop_string): Likewise.
1177         (error_stop_string): Likewise.
1178         (stop_numeric): Use int for exit code.
1179         (error_stop_numeric): Likewise.
1180         * caf/libcaf.h: Remove stdint.h include.
1181         (_gfortran_caf_register): Use size_t for character length.
1182         (_gfortran_caf_deregister): Likewise.
1183         (_gfortran_caf_sync_all): Likewise.
1184         (_gfortran_caf_sync_memory): Likewise.
1185         (_gfortran_caf_sync_images): Likewise.
1186         (_gfortran_caf_stop_numeric): Use int for exit code.
1187         (_gfortran_caf_stop_str): Use size_t for character length.
1188         (_gfortran_caf_error_stop_str): Likewise.
1189         (_gfortran_caf_error_stop): Use int for exit code.
1190         (_gfortran_caf_co_broadcast): Use size_t for character length.
1191         (_gfortran_caf_co_sum): Likewise.
1192         (_gfortran_caf_co_min): Likewise.
1193         (_gfortran_caf_co_max): Likewise.
1194         (_gfortran_caf_co_reduce): Likewise.
1195         (_gfortran_caf_lock): Likewise.
1196         (_gfortran_caf_unlock): Likewise.
1197         (_gfortran_caf_event_post): Likewise.
1198         (_gfortran_caf_event_wait): Likewise.
1199         * caf/mpi.c (_gfortran_caf_register): Update implementation to
1200         match prototype.
1201         (_gfortran_caf_deregister): Likewise.
1202         (_gfortran_caf_sync_all): Likewise.
1203         (_gfortran_caf_sync_images): Likewise.
1204         (_gfortran_caf_error_stop_str): Likewise.
1205         (_gfortran_caf_error_stop): Likewise.
1206         * caf/single.c (caf_internal_error): Likewise.
1207         (_gfortran_caf_register): Likewise.
1208         (_gfortran_caf_deregister): Likewise.
1209         (_gfortran_caf_sync_all): Likewise.
1210         (_gfortran_caf_sync_memory): Likewise.
1211         (_gfortran_caf_sync_images): Likewise.
1212         (_gfortran_caf_stop_numeric): Likewise.
1213         (_gfortran_caf_stop_str): Likewise.
1214         (_gfortran_caf_error_stop_str): Likewise.
1215         (_gfortran_caf_error_stop): Likewise.
1216         (_gfortran_caf_co_broadcast): Likewise.
1217         (_gfortran_caf_co_sum): Likewise.
1218         (_gfortran_caf_co_min): Likewise.
1219         (_gfortran_caf_co_max): Likewise.
1220         (_gfortran_caf_co_reduce): Likewise.
1221         (_gfortran_caf_event_post): Likewise.
1222         (_gfortran_caf_event_wait): Likewise.
1223         (_gfortran_caf_lock): Likewise.
1224         (_gfortran_caf_unlock): Likewise.
1226 2018-02-19  Andre Vehreschild  <vehre@gcc.gnu.org>
1228         * caf/libcaf.h: Add type parameters to the caf_*_by_ref prototypes.
1229         * caf/single.c (get_for_ref): Simplifications and now respecting
1230         the type argument.
1231         (_gfortran_caf_get_by_ref): Added source type handing to get_for_ref().
1232         (send_by_ref): Simplifications and respecting the dst_type now.
1233         (_gfortran_caf_send_by_ref): Added destination type hand over to
1234         send_by_ref().
1235         (_gfortran_caf_sendget_by_ref): Added general support and fixed stack
1236         corruption.  The function is now really usable.
1238 2018-02-14  Igor Tsimbalist  <igor.v.tsimbalist@intel.com>
1240         PR target/84148
1241         * configure: Regenerate.
1243 2018-02-18  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1245         PR libgfortran/84412
1246         * io/transfer.c (finalize_transfer): After completng an internal unit
1247         I/O operation, clear internal_unit_kind.
1249 2018-02-12  Thomas Koenig  <tkoenig@gcc.gnu.org>
1251         * libgfortran.h (GFC_ARRAY_DESCRIPTOR): Remove dimension
1252         of descriptor to use vaiable members for dim.
1253         Change usage of GFC_ARRAY_DESCRIPTOR accordingly.
1254         (GFC_FILL_ARRAY_DESCRIPTOR): New macro.
1255         (gfc_full_array_i4): New type.
1256         * intrinsics/date_and_time.c (secnds): Use sizeof
1257         (gfc_array_i4) + sizeof (descriptor_dimension) for memory
1258         allocation.
1259         * intrinsics/reshape_generic.c: Use GFC_FULL_ARRAY_DESCRIPTOR.
1260         * io/format.c: Use sizeof (gfc_array_i4) + sizeof
1261         (descriptor_dimension) for memoy allocation.
1262         * io/list_read.c (list_formatted_read_scalar): Use
1263         gfc_full_array_i4 for variable.
1264         (nml_read_obj): Likewise.
1265         * io/write.c (list_formatted_write_scalar): Likewise.
1266         (nml_write_obj): Likewise.
1267         * m4/reshape.m4: Use GFC_FULL_ARRAY_DESCRIPTOR.
1268         * generated/reshape_c10.c: Regenerated.
1269         * generated/reshape_c16.c: Regenerated.
1270         * generated/reshape_c4.c: Regenerated.
1271         * generated/reshape_c8.c: Regenerated.
1272         * generated/reshape_i16.c: Regenerated.
1273         * generated/reshape_i4.c: Regenerated.
1274         * generated/reshape_i8.c: Regenerated.
1275         * generated/reshape_r10.c: Regenerated.
1276         * generated/reshape_r16.c: Regenerated.
1277         * generated/reshape_r4.c: Regenerated.
1278         * generated/reshape_r8.c: Regenerated.
1280 2018-01-31  Janne Blomqvist  <jb@gcc.gnu.org>
1282         * generated/cshift1_16.c (cshift1): Regenerated.
1283         * generated/cshift1_4.c (cshift1): Regenerated.
1284         * generated/cshift1_8.c (cshift1): Regenerated.
1285         * generated/eoshift1_16.c (eoshift1): Regenerated.
1286         * generated/eoshift1_4.c (eoshift1): Regenerated.
1287         * generated/eoshift1_8.c (eoshift1): Regenerated.
1288         * generated/eoshift3_16.c (eoshift3): Regenerated.
1289         * generated/eoshift3_4.c (eoshift3): Regenerated.
1290         * generated/eoshift3_8.c (eoshift3): Regenerated.
1291         * generated/in_pack_c10.c (internal_pack_c10): Regenerated.
1292         * generated/in_pack_c16.c (internal_pack_c16): Regenerated.
1293         * generated/in_pack_c4.c (internal_pack_c4): Regenerated.
1294         * generated/in_pack_c8.c (internal_pack_c8): Regenerated.
1295         * generated/in_pack_i1.c (internal_pack_1): Regenerated.
1296         * generated/in_pack_i16.c (internal_pack_16): Regenerated.
1297         * generated/in_pack_i2.c (internal_pack_2): Regenerated.
1298         * generated/in_pack_i4.c (internal_pack_4): Regenerated.
1299         * generated/in_pack_i8.c (internal_pack_8): Regenerated.
1300         * generated/in_pack_r10.c (internal_pack_r10): Regenerated.
1301         * generated/in_pack_r16.c (internal_pack_r16): Regenerated.
1302         * generated/in_pack_r4.c (internal_pack_r4): Regenerated.
1303         * generated/in_pack_r8.c (internal_pack_r8): Regenerated.
1304         * generated/in_unpack_c10.c (internal_unpack_c10): Regenerated.
1305         * generated/in_unpack_c16.c (internal_unpack_c16): Regenerated.
1306         * generated/in_unpack_c4.c (internal_unpack_c4): Regenerated.
1307         * generated/in_unpack_c8.c (internal_unpack_c8): Regenerated.
1308         * generated/in_unpack_i1.c (internal_unpack_1): Regenerated.
1309         * generated/in_unpack_i16.c (internal_unpack_16): Regenerated.
1310         * generated/in_unpack_i2.c (internal_unpack_2): Regenerated.
1311         * generated/in_unpack_i4.c (internal_unpack_4): Regenerated.
1312         * generated/in_unpack_i8.c (internal_unpack_8): Regenerated.
1313         * generated/in_unpack_r10.c (internal_unpack_r10): Regenerated.
1314         * generated/in_unpack_r16.c (internal_unpack_r16): Regenerated.
1315         * generated/in_unpack_r4.c (internal_unpack_r4): Regenerated.
1316         * generated/in_unpack_r8.c (internal_unpack_r8): Regenerated.
1317         * generated/reshape_c10.c (reshape_c10): Regenerated.
1318         * generated/reshape_c16.c (reshape_c16): Regenerated.
1319         * generated/reshape_c4.c (reshape_c4): Regenerated.
1320         * generated/reshape_c8.c (reshape_c8): Regenerated.
1321         * generated/reshape_i16.c (reshape_16): Regenerated.
1322         * generated/reshape_i4.c (reshape_4): Regenerated.
1323         * generated/reshape_i8.c (reshape_8): Regenerated.
1324         * generated/reshape_r10.c (reshape_r10): Regenerated.
1325         * generated/reshape_r16.c (reshape_r16): Regenerated.
1326         * generated/reshape_r4.c (reshape_r4): Regenerated.
1327         * generated/reshape_r8.c (reshape_r8): Regenerated.
1328         * generated/shape_i1.c (shape_1): Regenerated.
1329         * generated/shape_i16.c (shape_16): Regenerated.
1330         * generated/shape_i2.c (shape_2): Regenerated.
1331         * generated/shape_i4.c (shape_4): Regenerated.
1332         * generated/shape_i8.c (shape_8): Regenerated.
1333         * generated/spread_c10.c (spread_scalar_c10): Regenerated.
1334         * generated/spread_c16.c (spread_scalar_c16): Regenerated.
1335         * generated/spread_c4.c (spread_scalar_c4): Regenerated.
1336         * generated/spread_c8.c (spread_scalar_c8): Regenerated.
1337         * generated/spread_i1.c (spread_scalar_i1): Regenerated.
1338         * generated/spread_i16.c (spread_scalar_i16): Regenerated.
1339         * generated/spread_i2.c (spread_scalar_i2): Regenerated.
1340         * generated/spread_i4.c (spread_scalar_i4): Regenerated.
1341         * generated/spread_i8.c (spread_scalar_i8): Regenerated.
1342         * generated/spread_r10.c (spread_scalar_r10): Regenerated.
1343         * generated/spread_r16.c (spread_scalar_r16): Regenerated.
1344         * generated/spread_r4.c (spread_scalar_r4): Regenerated.
1345         * generated/spread_r8.c (spread_scalar_r8): Regenerated.
1346         * intrinsics/random.c (jump): Use size_t for array index in loop.
1347         (getosrandom): Likewise.
1348         (arandom_r4): Make n an index_type.
1349         (arandom_r8): Likewise.
1350         (arandom_r10): Likewise.
1351         (arandom_r16): Likewise.
1352         (scramble_seed): Use size_t for array index in loop.
1353         * m4/cshift1.m4: Make i an index_type.
1354         * m4/eoshift1.m4: Likewise.
1355         * m4/eoshift3.m4: Likewise.
1356         * m4/in_pack.m4: Make n an index_type.
1357         * m4/in_unpack.m4: Likewise.
1358         * m4/reshape.m4: Make n and dim index_type's.
1359         * m4/shape.m4: Make n an index_type.
1360         * m4/spread.m4: Likewise, use index_type argument rather than
1361         copying to int.
1362         * runtime/bounds.c (bounds_ifunction_return): Make n an
1363         index_type.
1364         * runtime/in_pack_generic.c (internal_pack): Likewise.
1365         * runtime/in_unpack_generic.c (internal_unpack): Make n and size
1366         index_type's.
1368 2018-01-30  Thomas Koenig  <tkoenig@gcc.gnu.org>
1370         PR fortran/37577
1371         * libgfortran.h: Remove GFC_DTYPE_DERIVED_1, GFC_DTYPE_DERIVED_2,
1372         GFC_DTYPE_DERIVED_4, GFC_DTYPE_DERIVED_8 and GFC_DTYPE_DERIVED_16.
1373         * m4/cshift1.m4: Remove GFC_DTYPE_DERIVED_1.
1374         * generated/cshift1_16.c: Regenerated.
1375         * generated/cshift1_4.c: Regenerated.
1376         * generated/cshift1_8.c: Regenerated.
1377         * intrinsics/cshift0.c: Remove GFC_DTYPE_DERIVED_1.
1378         * intrinsics/pack_generic.c (pack): Move handling of other types
1379         into separate switch statement.
1380         * intrinsics/spread_generic.c (spread): Likewise.
1381         (spread_scalar): Likewise.
1382         * intrinsics/unpack_generic.c (unpack1): Likewise.
1383         (unpack0): Likewise.
1384         * runtime/in_pack_generic.c (internal_pack): Likewise.
1385         * runtime/in_unpack_generic.c (internal_unpack): Likewise.
1387 2018-01-25  Paul Thomas  <pault@gcc.gnu.org>
1389         PR fortran/37577
1390         * caf/single.c (_gfortran_caf_failed_images): Access the 'type'
1391         and 'elem_len' fields of the dtype instead of the shifts.
1392         (_gfortran_caf_stopped_images): Likewise.
1393         * intrinsics/associated.c (associated): Compare the 'type' and
1394         'elem_len' fields instead of the dtype.
1395         * caf/date_and_time.c : Access the dtype fields rather using
1396         shifts and masks.
1397         * io/transfer.c (transfer_array ): Comment on item count.
1398         (set_nml_var,st_set_nml_var): Change dtype type and use fields.
1399         (st_set_nml_dtio_var): Likewise.
1400         * libgfortran.h : Change definition of GFC_ARRAY_DESCRIPTOR and
1401         add a typedef for the dtype_type. Change the GFC_DTYPE_* macros
1402         to access the dtype fields.
1404 2018-01-15  Thomas Koenig  <tkoenig@gcc.gnu.org>
1406         PR fortran/54613
1407         * m4/iparm.m4: Add back_arg macro if in minloc or maxloc.
1408         * m4/iforeach-s.m4: Add optional argument back with back_arg
1409         macro. Improve m4 quoting. If HAVE_BACK_ARG is defined, assert
1410         that back is non-true.
1411         * m4/iforeach.m4: Likewise.
1412         * m4/ifunction-s.m4: Likewise.
1413         * m4/ifunction.m4: Likewise.
1414         * m4/maxloc0.m4: Include assert.h
1415         * m4/minloc0.m4: Likewise.
1416         * m4/maxloc0s.m4: #define HAVE_BACK_ARG.
1417         * m4/minloc0s.m4: Likewise.
1418         * m4/maxloc1s.m4: Likewise.
1419         * m4/minloc1s.m4: Likewise.
1420         * m4/maxloc1.m4: Include assert.h, #define HAVE_BACK_ARG.
1421         * m4/minloc1.m4: Likewise.
1422         * m4/maxloc2s.m4: Add assert.h, add back_arg, assert that
1423         back is non-true.
1424         * m4/minloc2s.m4: Likewise.
1425         * generated/iall_i1.c: Regenerated.
1426         * generated/iall_i16.c: Regenerated.
1427         * generated/iall_i2.c: Regenerated.
1428         * generated/iall_i4.c: Regenerated.
1429         * generated/iall_i8.c: Regenerated.
1430         * generated/iany_i1.c: Regenerated.
1431         * generated/iany_i16.c: Regenerated.
1432         * generated/iany_i2.c: Regenerated.
1433         * generated/iany_i4.c: Regenerated.
1434         * generated/iany_i8.c: Regenerated.
1435         * generated/iparity_i1.c: Regenerated.
1436         * generated/iparity_i16.c: Regenerated.
1437         * generated/iparity_i2.c: Regenerated.
1438         * generated/iparity_i4.c: Regenerated.
1439         * generated/iparity_i8.c: Regenerated.
1440         * generated/maxloc0_16_i1.c: Regenerated.
1441         * generated/maxloc0_16_i16.c: Regenerated.
1442         * generated/maxloc0_16_i2.c: Regenerated.
1443         * generated/maxloc0_16_i4.c: Regenerated.
1444         * generated/maxloc0_16_i8.c: Regenerated.
1445         * generated/maxloc0_16_r10.c: Regenerated.
1446         * generated/maxloc0_16_r16.c: Regenerated.
1447         * generated/maxloc0_16_r4.c: Regenerated.
1448         * generated/maxloc0_16_r8.c: Regenerated.
1449         * generated/maxloc0_16_s1.c: Regenerated.
1450         * generated/maxloc0_16_s4.c: Regenerated.
1451         * generated/maxloc0_4_i1.c: Regenerated.
1452         * generated/maxloc0_4_i16.c: Regenerated.
1453         * generated/maxloc0_4_i2.c: Regenerated.
1454         * generated/maxloc0_4_i4.c: Regenerated.
1455         * generated/maxloc0_4_i8.c: Regenerated.
1456         * generated/maxloc0_4_r10.c: Regenerated.
1457         * generated/maxloc0_4_r16.c: Regenerated.
1458         * generated/maxloc0_4_r4.c: Regenerated.
1459         * generated/maxloc0_4_r8.c: Regenerated.
1460         * generated/maxloc0_4_s1.c: Regenerated.
1461         * generated/maxloc0_4_s4.c: Regenerated.
1462         * generated/maxloc0_8_i1.c: Regenerated.
1463         * generated/maxloc0_8_i16.c: Regenerated.
1464         * generated/maxloc0_8_i2.c: Regenerated.
1465         * generated/maxloc0_8_i4.c: Regenerated.
1466         * generated/maxloc0_8_i8.c: Regenerated.
1467         * generated/maxloc0_8_r10.c: Regenerated.
1468         * generated/maxloc0_8_r16.c: Regenerated.
1469         * generated/maxloc0_8_r4.c: Regenerated.
1470         * generated/maxloc0_8_r8.c: Regenerated.
1471         * generated/maxloc0_8_s1.c: Regenerated.
1472         * generated/maxloc0_8_s4.c: Regenerated.
1473         * generated/maxloc1_16_i1.c: Regenerated.
1474         * generated/maxloc1_16_i16.c: Regenerated.
1475         * generated/maxloc1_16_i2.c: Regenerated.
1476         * generated/maxloc1_16_i4.c: Regenerated.
1477         * generated/maxloc1_16_i8.c: Regenerated.
1478         * generated/maxloc1_16_r10.c: Regenerated.
1479         * generated/maxloc1_16_r16.c: Regenerated.
1480         * generated/maxloc1_16_r4.c: Regenerated.
1481         * generated/maxloc1_16_r8.c: Regenerated.
1482         * generated/maxloc1_16_s1.c: Regenerated.
1483         * generated/maxloc1_16_s4.c: Regenerated.
1484         * generated/maxloc1_4_i1.c: Regenerated.
1485         * generated/maxloc1_4_i16.c: Regenerated.
1486         * generated/maxloc1_4_i2.c: Regenerated.
1487         * generated/maxloc1_4_i4.c: Regenerated.
1488         * generated/maxloc1_4_i8.c: Regenerated.
1489         * generated/maxloc1_4_r10.c: Regenerated.
1490         * generated/maxloc1_4_r16.c: Regenerated.
1491         * generated/maxloc1_4_r4.c: Regenerated.
1492         * generated/maxloc1_4_r8.c: Regenerated.
1493         * generated/maxloc1_4_s1.c: Regenerated.
1494         * generated/maxloc1_4_s4.c: Regenerated.
1495         * generated/maxloc1_8_i1.c: Regenerated.
1496         * generated/maxloc1_8_i16.c: Regenerated.
1497         * generated/maxloc1_8_i2.c: Regenerated.
1498         * generated/maxloc1_8_i4.c: Regenerated.
1499         * generated/maxloc1_8_i8.c: Regenerated.
1500         * generated/maxloc1_8_r10.c: Regenerated.
1501         * generated/maxloc1_8_r16.c: Regenerated.
1502         * generated/maxloc1_8_r4.c: Regenerated.
1503         * generated/maxloc1_8_r8.c: Regenerated.
1504         * generated/maxloc1_8_s1.c: Regenerated.
1505         * generated/maxloc1_8_s4.c: Regenerated.
1506         * generated/maxval_i1.c: Regenerated.
1507         * generated/maxval_i16.c: Regenerated.
1508         * generated/maxval_i2.c: Regenerated.
1509         * generated/maxval_i4.c: Regenerated.
1510         * generated/maxval_i8.c: Regenerated.
1511         * generated/maxval_r10.c: Regenerated.
1512         * generated/maxval_r16.c: Regenerated.
1513         * generated/maxval_r4.c: Regenerated.
1514         * generated/maxval_r8.c: Regenerated.
1515         * generated/minloc0_16_i1.c: Regenerated.
1516         * generated/minloc0_16_i16.c: Regenerated.
1517         * generated/minloc0_16_i2.c: Regenerated.
1518         * generated/minloc0_16_i4.c: Regenerated.
1519         * generated/minloc0_16_i8.c: Regenerated.
1520         * generated/minloc0_16_r10.c: Regenerated.
1521         * generated/minloc0_16_r16.c: Regenerated.
1522         * generated/minloc0_16_r4.c: Regenerated.
1523         * generated/minloc0_16_r8.c: Regenerated.
1524         * generated/minloc0_16_s1.c: Regenerated.
1525         * generated/minloc0_16_s4.c: Regenerated.
1526         * generated/minloc0_4_i1.c: Regenerated.
1527         * generated/minloc0_4_i16.c: Regenerated.
1528         * generated/minloc0_4_i2.c: Regenerated.
1529         * generated/minloc0_4_i4.c: Regenerated.
1530         * generated/minloc0_4_i8.c: Regenerated.
1531         * generated/minloc0_4_r10.c: Regenerated.
1532         * generated/minloc0_4_r16.c: Regenerated.
1533         * generated/minloc0_4_r4.c: Regenerated.
1534         * generated/minloc0_4_r8.c: Regenerated.
1535         * generated/minloc0_4_s1.c: Regenerated.
1536         * generated/minloc0_4_s4.c: Regenerated.
1537         * generated/minloc0_8_i1.c: Regenerated.
1538         * generated/minloc0_8_i16.c: Regenerated.
1539         * generated/minloc0_8_i2.c: Regenerated.
1540         * generated/minloc0_8_i4.c: Regenerated.
1541         * generated/minloc0_8_i8.c: Regenerated.
1542         * generated/minloc0_8_r10.c: Regenerated.
1543         * generated/minloc0_8_r16.c: Regenerated.
1544         * generated/minloc0_8_r4.c: Regenerated.
1545         * generated/minloc0_8_r8.c: Regenerated.
1546         * generated/minloc0_8_s1.c: Regenerated.
1547         * generated/minloc0_8_s4.c: Regenerated.
1548         * generated/minloc1_16_i1.c: Regenerated.
1549         * generated/minloc1_16_i16.c: Regenerated.
1550         * generated/minloc1_16_i2.c: Regenerated.
1551         * generated/minloc1_16_i4.c: Regenerated.
1552         * generated/minloc1_16_i8.c: Regenerated.
1553         * generated/minloc1_16_r10.c: Regenerated.
1554         * generated/minloc1_16_r16.c: Regenerated.
1555         * generated/minloc1_16_r4.c: Regenerated.
1556         * generated/minloc1_16_r8.c: Regenerated.
1557         * generated/minloc1_16_s1.c: Regenerated.
1558         * generated/minloc1_16_s4.c: Regenerated.
1559         * generated/minloc1_4_i1.c: Regenerated.
1560         * generated/minloc1_4_i16.c: Regenerated.
1561         * generated/minloc1_4_i2.c: Regenerated.
1562         * generated/minloc1_4_i4.c: Regenerated.
1563         * generated/minloc1_4_i8.c: Regenerated.
1564         * generated/minloc1_4_r10.c: Regenerated.
1565         * generated/minloc1_4_r16.c: Regenerated.
1566         * generated/minloc1_4_r4.c: Regenerated.
1567         * generated/minloc1_4_r8.c: Regenerated.
1568         * generated/minloc1_4_s1.c: Regenerated.
1569         * generated/minloc1_4_s4.c: Regenerated.
1570         * generated/minloc1_8_i1.c: Regenerated.
1571         * generated/minloc1_8_i16.c: Regenerated.
1572         * generated/minloc1_8_i2.c: Regenerated.
1573         * generated/minloc1_8_i4.c: Regenerated.
1574         * generated/minloc1_8_i8.c: Regenerated.
1575         * generated/minloc1_8_r10.c: Regenerated.
1576         * generated/minloc1_8_r16.c: Regenerated.
1577         * generated/minloc1_8_r4.c: Regenerated.
1578         * generated/minloc1_8_r8.c: Regenerated.
1579         * generated/minloc1_8_s1.c: Regenerated.
1580         * generated/minloc1_8_s4.c: Regenerated.
1581         * generated/minval_i1.c: Regenerated.
1582         * generated/minval_i16.c: Regenerated.
1583         * generated/minval_i2.c: Regenerated.
1584         * generated/minval_i4.c: Regenerated.
1585         * generated/minval_i8.c: Regenerated.
1586         * generated/minval_r10.c: Regenerated.
1587         * generated/minval_r16.c: Regenerated.
1588         * generated/minval_r4.c: Regenerated.
1589         * generated/minval_r8.c: Regenerated.
1590         * generated/norm2_r10.c: Regenerated.
1591         * generated/norm2_r16.c: Regenerated.
1592         * generated/norm2_r4.c: Regenerated.
1593         * generated/norm2_r8.c: Regenerated.
1594         * generated/parity_l1.c: Regenerated.
1595         * generated/parity_l16.c: Regenerated.
1596         * generated/parity_l2.c: Regenerated.
1597         * generated/parity_l4.c: Regenerated.
1598         * generated/parity_l8.c: Regenerated.
1599         * generated/product_c10.c: Regenerated.
1600         * generated/product_c16.c: Regenerated.
1601         * generated/product_c4.c: Regenerated.
1602         * generated/product_c8.c: Regenerated.
1603         * generated/product_i1.c: Regenerated.
1604         * generated/product_i16.c: Regenerated.
1605         * generated/product_i2.c: Regenerated.
1606         * generated/product_i4.c: Regenerated.
1607         * generated/product_i8.c: Regenerated.
1608         * generated/product_r10.c: Regenerated.
1609         * generated/product_r16.c: Regenerated.
1610         * generated/product_r4.c: Regenerated.
1611         * generated/product_r8.c: Regenerated.
1612         * generated/sum_c10.c: Regenerated.
1613         * generated/sum_c16.c: Regenerated.
1614         * generated/sum_c4.c: Regenerated.
1615         * generated/sum_c8.c: Regenerated.
1616         * generated/sum_i1.c: Regenerated.
1617         * generated/sum_i16.c: Regenerated.
1618         * generated/sum_i2.c: Regenerated.
1619         * generated/sum_i4.c: Regenerated.
1620         * generated/sum_i8.c: Regenerated.
1621         * generated/sum_r10.c: Regenerated.
1622         * generated/sum_r16.c: Regenerated.
1623         * generated/sum_r4.c: Regenerated.
1624         * generated/sum_r8.c: Regenerated.
1626 2018-01-14  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1628         PR libgfortran/83811
1629         * write.c (select_buffer): Adjust buffer size up by 1.
1631 2018-01-08  Janne Blomqvist  <jb@gcc.gnu.org>
1633         PR 78534, bugfix for r256322
1634         * io/transfer.c (next_record_w): Use correct type for return value
1635         of next_array_record.
1637 2018-01-07  Thomas Koenig  <tkoenig@gcc.gnu.org>
1639         * libgfortran.h (GFC_DTYPE_COPY): New macro.
1640         (GFC_DTYPE_COPY_SETRANK): New macro.
1641         (GFC_DTYPE_IS_UNSET): New macro.
1642         * intrinsics/cshift0.c (cshift0): Use new macros.
1643         * intrinsics/eoshift0.c (eoshift0): Likewise.
1644         * intrinsics/eoshift2.c (eoshift2): Likewise.
1645         * intrinsics/move_alloc.c (move_alloc): Likewise.
1646         * intrinsics/reshape_generic.c (reshape_internal): Likewise.
1647         * intrinsics/spread_generic.c (spread_internal): Likewise.
1648         * intrinsics/spread_generic.c (spread_scalar): Likewise.
1649         * intrinsics/spread_generic.c (spread_char_scalar): Likewise.
1650         * intrinsics/spread_generic.c (spread_char4_scalar): Likewise.
1651         * intrinsics/unpack_generic.c (unpack0): Likewise.
1652         * intrinsics/unpack_generic.c (unpack0_char): Likewise.
1653         * intrinsics/unpack_generic.c (unpack0_char4): Likewise.
1654         * m4/cshift1.m4 (cshift1): Likewise.
1655         * m4/eoshift1.m4 (eoshift1): Likewise.
1656         * m4/eoshift3.m4 (eoshift3): Likewise.
1657         * m4/iforeach-s.m4: Likewise.
1658         * m4/iforeach.m4: Likewise.
1659         * m4/ifunction-s.m4: Likewise.
1660         * m4/ifunction-s2.m4: Likewise.
1661         * m4/ifunction.m4: Likewise.
1662         * m4/ifunction_logical.m4: Likewise.
1663         * m4/reshape.m4: Likewise.
1664         * m4/spread.m4: Likewise.
1665         * generated/all_l1.c : Regenerated.
1666         * generated/all_l16.c : Regenerated.
1667         * generated/all_l2.c : Regenerated.
1668         * generated/all_l4.c : Regenerated.
1669         * generated/all_l8.c : Regenerated.
1670         * generated/any_l1.c : Regenerated.
1671         * generated/any_l16.c : Regenerated.
1672         * generated/any_l2.c : Regenerated.
1673         * generated/any_l4.c : Regenerated.
1674         * generated/any_l8.c : Regenerated.
1675         * generated/count_16_l.c : Regenerated.
1676         * generated/count_1_l.c : Regenerated.
1677         * generated/count_2_l.c : Regenerated.
1678         * generated/count_4_l.c : Regenerated.
1679         * generated/count_8_l.c : Regenerated.
1680         * generated/cshift1_16.c : Regenerated.
1681         * generated/cshift1_4.c : Regenerated.
1682         * generated/cshift1_8.c : Regenerated.
1683         * generated/eoshift1_16.c : Regenerated.
1684         * generated/eoshift1_4.c : Regenerated.
1685         * generated/eoshift1_8.c : Regenerated.
1686         * generated/eoshift3_16.c : Regenerated.
1687         * generated/eoshift3_4.c : Regenerated.
1688         * generated/eoshift3_8.c : Regenerated.
1689         * generated/iall_i1.c : Regenerated.
1690         * generated/iall_i16.c : Regenerated.
1691         * generated/iall_i2.c : Regenerated.
1692         * generated/iall_i4.c : Regenerated.
1693         * generated/iall_i8.c : Regenerated.
1694         * generated/iany_i1.c : Regenerated.
1695         * generated/iany_i16.c : Regenerated.
1696         * generated/iany_i2.c : Regenerated.
1697         * generated/iany_i4.c : Regenerated.
1698         * generated/iany_i8.c : Regenerated.
1699         * generated/iparity_i1.c : Regenerated.
1700         * generated/iparity_i16.c : Regenerated.
1701         * generated/iparity_i2.c : Regenerated.
1702         * generated/iparity_i4.c : Regenerated.
1703         * generated/iparity_i8.c : Regenerated.
1704         * generated/maxloc0_16_i1.c : Regenerated.
1705         * generated/maxloc0_16_i16.c : Regenerated.
1706         * generated/maxloc0_16_i2.c : Regenerated.
1707         * generated/maxloc0_16_i4.c : Regenerated.
1708         * generated/maxloc0_16_i8.c : Regenerated.
1709         * generated/maxloc0_16_r10.c : Regenerated.
1710         * generated/maxloc0_16_r16.c : Regenerated.
1711         * generated/maxloc0_16_r4.c : Regenerated.
1712         * generated/maxloc0_16_r8.c : Regenerated.
1713         * generated/maxloc0_16_s1.c : Regenerated.
1714         * generated/maxloc0_16_s4.c : Regenerated.
1715         * generated/maxloc0_4_i1.c : Regenerated.
1716         * generated/maxloc0_4_i16.c : Regenerated.
1717         * generated/maxloc0_4_i2.c : Regenerated.
1718         * generated/maxloc0_4_i4.c : Regenerated.
1719         * generated/maxloc0_4_i8.c : Regenerated.
1720         * generated/maxloc0_4_r10.c : Regenerated.
1721         * generated/maxloc0_4_r16.c : Regenerated.
1722         * generated/maxloc0_4_r4.c : Regenerated.
1723         * generated/maxloc0_4_r8.c : Regenerated.
1724         * generated/maxloc0_4_s1.c : Regenerated.
1725         * generated/maxloc0_4_s4.c : Regenerated.
1726         * generated/maxloc0_8_i1.c : Regenerated.
1727         * generated/maxloc0_8_i16.c : Regenerated.
1728         * generated/maxloc0_8_i2.c : Regenerated.
1729         * generated/maxloc0_8_i4.c : Regenerated.
1730         * generated/maxloc0_8_i8.c : Regenerated.
1731         * generated/maxloc0_8_r10.c : Regenerated.
1732         * generated/maxloc0_8_r16.c : Regenerated.
1733         * generated/maxloc0_8_r4.c : Regenerated.
1734         * generated/maxloc0_8_r8.c : Regenerated.
1735         * generated/maxloc0_8_s1.c : Regenerated.
1736         * generated/maxloc0_8_s4.c : Regenerated.
1737         * generated/maxloc1_16_i1.c : Regenerated.
1738         * generated/maxloc1_16_i16.c : Regenerated.
1739         * generated/maxloc1_16_i2.c : Regenerated.
1740         * generated/maxloc1_16_i4.c : Regenerated.
1741         * generated/maxloc1_16_i8.c : Regenerated.
1742         * generated/maxloc1_16_r10.c : Regenerated.
1743         * generated/maxloc1_16_r16.c : Regenerated.
1744         * generated/maxloc1_16_r4.c : Regenerated.
1745         * generated/maxloc1_16_r8.c : Regenerated.
1746         * generated/maxloc1_16_s1.c : Regenerated.
1747         * generated/maxloc1_16_s4.c : Regenerated.
1748         * generated/maxloc1_4_i1.c : Regenerated.
1749         * generated/maxloc1_4_i16.c : Regenerated.
1750         * generated/maxloc1_4_i2.c : Regenerated.
1751         * generated/maxloc1_4_i4.c : Regenerated.
1752         * generated/maxloc1_4_i8.c : Regenerated.
1753         * generated/maxloc1_4_r10.c : Regenerated.
1754         * generated/maxloc1_4_r16.c : Regenerated.
1755         * generated/maxloc1_4_r4.c : Regenerated.
1756         * generated/maxloc1_4_r8.c : Regenerated.
1757         * generated/maxloc1_4_s1.c : Regenerated.
1758         * generated/maxloc1_4_s4.c : Regenerated.
1759         * generated/maxloc1_8_i1.c : Regenerated.
1760         * generated/maxloc1_8_i16.c : Regenerated.
1761         * generated/maxloc1_8_i2.c : Regenerated.
1762         * generated/maxloc1_8_i4.c : Regenerated.
1763         * generated/maxloc1_8_i8.c : Regenerated.
1764         * generated/maxloc1_8_r10.c : Regenerated.
1765         * generated/maxloc1_8_r16.c : Regenerated.
1766         * generated/maxloc1_8_r4.c : Regenerated.
1767         * generated/maxloc1_8_r8.c : Regenerated.
1768         * generated/maxloc1_8_s1.c : Regenerated.
1769         * generated/maxloc1_8_s4.c : Regenerated.
1770         * generated/maxval1_s1.c : Regenerated.
1771         * generated/maxval1_s4.c : Regenerated.
1772         * generated/maxval_i1.c : Regenerated.
1773         * generated/maxval_i16.c : Regenerated.
1774         * generated/maxval_i2.c : Regenerated.
1775         * generated/maxval_i4.c : Regenerated.
1776         * generated/maxval_i8.c : Regenerated.
1777         * generated/maxval_r10.c : Regenerated.
1778         * generated/maxval_r16.c : Regenerated.
1779         * generated/maxval_r4.c : Regenerated.
1780         * generated/maxval_r8.c : Regenerated.
1781         * generated/minloc0_16_i1.c : Regenerated.
1782         * generated/minloc0_16_i16.c : Regenerated.
1783         * generated/minloc0_16_i2.c : Regenerated.
1784         * generated/minloc0_16_i4.c : Regenerated.
1785         * generated/minloc0_16_i8.c : Regenerated.
1786         * generated/minloc0_16_r10.c : Regenerated.
1787         * generated/minloc0_16_r16.c : Regenerated.
1788         * generated/minloc0_16_r4.c : Regenerated.
1789         * generated/minloc0_16_r8.c : Regenerated.
1790         * generated/minloc0_16_s1.c : Regenerated.
1791         * generated/minloc0_16_s4.c : Regenerated.
1792         * generated/minloc0_4_i1.c : Regenerated.
1793         * generated/minloc0_4_i16.c : Regenerated.
1794         * generated/minloc0_4_i2.c : Regenerated.
1795         * generated/minloc0_4_i4.c : Regenerated.
1796         * generated/minloc0_4_i8.c : Regenerated.
1797         * generated/minloc0_4_r10.c : Regenerated.
1798         * generated/minloc0_4_r16.c : Regenerated.
1799         * generated/minloc0_4_r4.c : Regenerated.
1800         * generated/minloc0_4_r8.c : Regenerated.
1801         * generated/minloc0_4_s1.c : Regenerated.
1802         * generated/minloc0_4_s4.c : Regenerated.
1803         * generated/minloc0_8_i1.c : Regenerated.
1804         * generated/minloc0_8_i16.c : Regenerated.
1805         * generated/minloc0_8_i2.c : Regenerated.
1806         * generated/minloc0_8_i4.c : Regenerated.
1807         * generated/minloc0_8_i8.c : Regenerated.
1808         * generated/minloc0_8_r10.c : Regenerated.
1809         * generated/minloc0_8_r16.c : Regenerated.
1810         * generated/minloc0_8_r4.c : Regenerated.
1811         * generated/minloc0_8_r8.c : Regenerated.
1812         * generated/minloc0_8_s1.c : Regenerated.
1813         * generated/minloc0_8_s4.c : Regenerated.
1814         * generated/minloc1_16_i1.c : Regenerated.
1815         * generated/minloc1_16_i16.c : Regenerated.
1816         * generated/minloc1_16_i2.c : Regenerated.
1817         * generated/minloc1_16_i4.c : Regenerated.
1818         * generated/minloc1_16_i8.c : Regenerated.
1819         * generated/minloc1_16_r10.c : Regenerated.
1820         * generated/minloc1_16_r16.c : Regenerated.
1821         * generated/minloc1_16_r4.c : Regenerated.
1822         * generated/minloc1_16_r8.c : Regenerated.
1823         * generated/minloc1_16_s1.c : Regenerated.
1824         * generated/minloc1_16_s4.c : Regenerated.
1825         * generated/minloc1_4_i1.c : Regenerated.
1826         * generated/minloc1_4_i16.c : Regenerated.
1827         * generated/minloc1_4_i2.c : Regenerated.
1828         * generated/minloc1_4_i4.c : Regenerated.
1829         * generated/minloc1_4_i8.c : Regenerated.
1830         * generated/minloc1_4_r10.c : Regenerated.
1831         * generated/minloc1_4_r16.c : Regenerated.
1832         * generated/minloc1_4_r4.c : Regenerated.
1833         * generated/minloc1_4_r8.c : Regenerated.
1834         * generated/minloc1_4_s1.c : Regenerated.
1835         * generated/minloc1_4_s4.c : Regenerated.
1836         * generated/minloc1_8_i1.c : Regenerated.
1837         * generated/minloc1_8_i16.c : Regenerated.
1838         * generated/minloc1_8_i2.c : Regenerated.
1839         * generated/minloc1_8_i4.c : Regenerated.
1840         * generated/minloc1_8_i8.c : Regenerated.
1841         * generated/minloc1_8_r10.c : Regenerated.
1842         * generated/minloc1_8_r16.c : Regenerated.
1843         * generated/minloc1_8_r4.c : Regenerated.
1844         * generated/minloc1_8_r8.c : Regenerated.
1845         * generated/minloc1_8_s1.c : Regenerated.
1846         * generated/minloc1_8_s4.c : Regenerated.
1847         * generated/minval1_s1.c : Regenerated.
1848         * generated/minval1_s4.c : Regenerated.
1849         * generated/minval_i1.c : Regenerated.
1850         * generated/minval_i16.c : Regenerated.
1851         * generated/minval_i2.c : Regenerated.
1852         * generated/minval_i4.c : Regenerated.
1853         * generated/minval_i8.c : Regenerated.
1854         * generated/minval_r10.c : Regenerated.
1855         * generated/minval_r16.c : Regenerated.
1856         * generated/minval_r4.c : Regenerated.
1857         * generated/minval_r8.c : Regenerated.
1858         * generated/norm2_r10.c : Regenerated.
1859         * generated/norm2_r16.c : Regenerated.
1860         * generated/norm2_r4.c : Regenerated.
1861         * generated/norm2_r8.c : Regenerated.
1862         * generated/parity_l1.c : Regenerated.
1863         * generated/parity_l16.c : Regenerated.
1864         * generated/parity_l2.c : Regenerated.
1865         * generated/parity_l4.c : Regenerated.
1866         * generated/parity_l8.c : Regenerated.
1867         * generated/product_c10.c : Regenerated.
1868         * generated/product_c16.c : Regenerated.
1869         * generated/product_c4.c : Regenerated.
1870         * generated/product_c8.c : Regenerated.
1871         * generated/product_i1.c : Regenerated.
1872         * generated/product_i16.c : Regenerated.
1873         * generated/product_i2.c : Regenerated.
1874         * generated/product_i4.c : Regenerated.
1875         * generated/product_i8.c : Regenerated.
1876         * generated/product_r10.c : Regenerated.
1877         * generated/product_r16.c : Regenerated.
1878         * generated/product_r4.c : Regenerated.
1879         * generated/product_r8.c : Regenerated.
1880         * generated/reshape_c10.c : Regenerated.
1881         * generated/reshape_c16.c : Regenerated.
1882         * generated/reshape_c4.c : Regenerated.
1883         * generated/reshape_c8.c : Regenerated.
1884         * generated/reshape_i16.c : Regenerated.
1885         * generated/reshape_i4.c : Regenerated.
1886         * generated/reshape_i8.c : Regenerated.
1887         * generated/reshape_r10.c : Regenerated.
1888         * generated/reshape_r16.c : Regenerated.
1889         * generated/reshape_r4.c : Regenerated.
1890         * generated/reshape_r8.c : Regenerated.
1891         * generated/spread_c10.c : Regenerated.
1892         * generated/spread_c16.c : Regenerated.
1893         * generated/spread_c4.c : Regenerated.
1894         * generated/spread_c8.c : Regenerated.
1895         * generated/spread_i1.c : Regenerated.
1896         * generated/spread_i16.c : Regenerated.
1897         * generated/spread_i2.c : Regenerated.
1898         * generated/spread_i4.c : Regenerated.
1899         * generated/spread_i8.c : Regenerated.
1900         * generated/spread_r10.c : Regenerated.
1901         * generated/spread_r16.c : Regenerated.
1902         * generated/spread_r4.c : Regenerated.
1903         * generated/spread_r8.c : Regenerated.
1904         * generated/sum_c10.c : Regenerated.
1905         * generated/sum_c16.c : Regenerated.
1906         * generated/sum_c4.c : Regenerated.
1907         * generated/sum_c8.c : Regenerated.
1908         * generated/sum_i1.c : Regenerated.
1909         * generated/sum_i16.c : Regenerated.
1910         * generated/sum_i2.c : Regenerated.
1911         * generated/sum_i4.c : Regenerated.
1912         * generated/sum_i8.c : Regenerated.
1913         * generated/sum_r10.c : Regenerated.
1914         * generated/sum_r16.c : Regenerated.
1915         * generated/sum_r4.c : Regenerated.
1916         * generated/sum_r8.c : Regenerated.
1918 2018-01-07  Janne Blomqvist  <jb@gcc.gnu.org>
1920         PR fortran/78534
1921         PR fortran/83704
1922         * io/fbuf.c (fbuf_init): Use size_t instead of int for length.
1923         (fbuf_debug): Convert debug output to unsigned long.
1924         (fbuf_reset): Use ptrdiff_t for return value.
1925         (fbuf_alloc): Use size_t for length argument.
1926         (fbuf_flush): Handle large buffers.
1927         (fbuf_flush_list): Likewise.
1928         (fbuf_seek): Use ptrdiff_t for offset and return value.
1929         (fbuf_read): Use size_t for length argument.
1930         (fbuf_getc_refill): Use size_t to match fbuf_read.
1931         * io/fbuf.h (struct fbuf): Use size_t for lengths.
1932         (fbuf_init): Use size_t instead of int for length.
1933         (fbuf_reset): Use ptrdiff_t for return value.
1934         (fbuf_alloc): Use size_t for length argument.
1935         (fbuf_seek): Use ptrdiff_t for offset and return value.
1936         (fbuf_read): Use size_t for length argument.
1937         * io/io.h (read_block_form): Likewise.
1938         (read_block_form4): Likewise.
1939         (write_block): Likewise.
1940         (read_a): Likewise.
1941         (read_a_char4): Likewise.
1942         (read_x): Likewise.
1943         (write_a): Likewise.
1944         (write_a_char4): Likewise.
1945         * io/list_read.c (list_formatted_read_scalar): Use size_t to
1946         handle large buffers.
1947         * io/read.c (read_l): Likewise.
1948         (read_utf8): Likewise.
1949         (read_utf8_char1): Likewise.
1950         (read_default_char1): Likewise.
1951         (read_utf8_char4): Likewise.
1952         (read_default_char4): Likewise.
1953         (read_a): Likewise.
1954         (read_a_char4): Likewise.
1955         (eat_leading_spaces): Likewise.
1956         (next_char): Likewise.
1957         (read_decimal): Likewise.
1958         (read_radix): Likewise.
1959         (read_f): Likewise.
1960         (read_x): Likewise.
1961         * io/transfer.c (read_sf_internal): Likewise.
1962         (read_sf): Likewise.
1963         (read_block_form): Likewise.
1964         (read_block_form4): Likewise.
1965         (write_block): Likewise.
1966         (formatted_transfer_scalar_write): Likewise.
1967         (next_record_w): Likewise.
1968         * io/unix.c (mem_alloc_r): Likewise.
1969         (mem_alloc_r4): Likewise.
1970         (mem_alloc_w): Likewise.
1971         (mem_alloc_w4): Likewise.
1972         (mem_read): Likewise.
1973         (mem_read4): Likewise.
1974         (mem_write): Likewise.
1975         (mem_write4): Likewise.
1976         (open_internal): Likewise.
1977         (open_internal4): Likewise.
1978         * io/unix.h (open_internal): Likewise.
1979         (open_internal4): Likewise.
1980         (mem_alloc_w): Likewise.
1981         (mem_alloc_r): Likewise.
1982         (mem_alloc_w4): Likewise.
1983         (mem_alloc_r4): Likewise.
1984         * io/write.c (write_check_cc): Likewise.
1985         (write_cc): Likewise.
1986         (write_a): Likewise.
1987         (write_a_char4): Likewise.
1989 2018-01-06  Janne Blomqvist  <jb@gcc.gnu.org>
1991         * io/write.c (namelist_write): Remove unused variable "i".
1993 2018-01-06  Dominique d'Humieres  <dominiq@lps.ens.fr>
1994             Janne Blomqvist  <jb@gcc.gnu.org>
1996         PR fortran/83704
1997         * io/write.c (write_character): Use size_t instead of int for
1998         length.
2000 2018-01-05  Janne Blomqvist  <jb@gcc.gnu.org>
2002         PR fortran/78534
2003         * intrinsics/args.c (getarg_i4): Use gfc_charlen_type.
2004         (get_command_argument_i4): Likewise.
2005         (get_command_i4): Likewise.
2006         * intrinsics/chmod.c (chmod_internal): Likewise.
2007         * intrinsics/env.c (get_environment_variable_i4): Likewise.
2008         * intrinsics/extends_type_of.c (struct vtype): Use size_t for size
2009         member.
2010         * intrinsics/gerror.c (gerror): Use gfc_charlen_type.
2011         * intrinsics/getlog.c (getlog): Likewise.
2012         * intrinsics/hostnm.c (hostnm_0): Likewise.
2013         * intrinsics/string_intrinsics_inc.c (string_len_trim): Rework to
2014         work if gfc_charlen_type is unsigned.
2015         (string_scan): Likewise.
2016         * io/transfer.c (transfer_character): Modify prototype.
2017         (transfer_character_write): Likewise.
2018         (transfer_character_wide): Likewise.
2019         (transfer_character_wide_write): Likewise.
2020         (transfer_array): Typecast to avoid signed-unsigned comparison.
2021         * io/unit.c (is_trim_ok): Use gfc_charlen_type.
2022         * io/write.c (namelist_write): Likewise.
2023         * libgfortran.h (gfc_charlen_type): Change typedef to size_t.
2025 2018-01-03  Jakub Jelinek  <jakub@redhat.com>
2027         Update copyright years.
2029 2018-01-02  Janne Blomqvist  <jb@gcc.gnu.org>
2031         PR libgfortran/83649
2032         * io/unix.c (MAX_CHUNK): New define.
2033         (raw_read): For reads larger than MAX_CHUNK, loop.
2034         (raw_write): Write no more than MAX_CHUNK bytes per iteration.
2036 Copyright (C) 2018 Free Software Foundation, Inc.
2038 Copying and distribution of this file, with or without modification,
2039 are permitted in any medium without royalty provided the copyright
2040 notice and this notice are preserved.