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