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