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