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