1 2010-12-10 Tobias Burnus <burnus@net-b.de>
4 * acinclude.m4 (LIBGFOR_CHECK_FLOAT128): Honour
5 --disable-libquadmath-support.
6 * configure.ac: Handle --disable-libquadmath-support.
7 * configure: Regenerate.
9 2010-12-06 Dave Korn <dave.korn.cygwin@gmail.com>
13 * configure.ac: Invoke ACX_LT_HOST_FLAGS.
14 * Makefile.am (LTLDFLAGS): Use lt_host_flags.
15 * aclocal.m4: Regenerate.
16 * configure: Regenerate.
17 * Makefile.in: Regenerate.
19 2010-11-16 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
20 Tobias Burnus <burnus@net-b.de>
23 * Makefile.am: Add missing pow_r16_i4.c, add transfer128.c,
24 link libquadmath, if used.
25 * acinclude.m4 (LIBGFOR_CHECK_FLOAT128): Add.
26 * configure.ac: Use it, touch spec file.
27 * gfortran.map: Add pow_r16_i4 and
28 transfer_(real,complex)128(,write) functions.
29 * intrinsics/cshift0.c (cshift0): Handle __float128 type.
30 * intrinsics/erfc_scaled_inc.c: Ditto.
31 * intrinsics/pack_generic.c (pack): Ditto
32 * intrinsics/spread_generic.c (spread): Ditto.
33 * intrinsics/unpack_generic.c (unpack1): Ditto.
34 * io/read.c (convert_real): Ditto.
35 * io/transfer.c: Update comments.
36 * io/transfer128.c: New file.
37 * io/write_float.def (write_float): Handle __float128 type.
38 * libgfortran.h: #include quadmath_weak.h, define __builtin_infq
40 * m4/mtype.m4: Handle __float128 type.
41 * runtime/in_pack_generic.c (internal_pack): Ditto.
42 * runtime/in_unpack_generic.c (internal_unpack): Ditto.
43 * kinds-override.h: New file.
44 * libgfortran.spec.in: Ditto.
45 * generated/pow_r16_i4.c: Generated.
46 * Makefile.in: Regenerate.
47 * configure: Regenerate.
48 * config.h: Regenerate.
49 * bessel_r10.c: Regenerate.
50 * bessel_r16.c: Regenerate.
51 * bessel_r4.c: Regenerate.
52 * bessel_r8.c: Regenerate.
53 * exponent_r16.c: Regenerate.
54 * fraction_r16.c: Regenerate.
55 * nearest_r16.c: Regenerate.
56 * norm2_r10.c: Regenerate.
57 * norm2_r16.c: Regenerate.
58 * norm2_r4.c: Regenerate.
59 * norm2_r8.c: Regenerate.
60 * rrspacing_r16.c: Regenerate.
61 * set_exponent_r16.c: Regenerate.
62 * spacing_r16.c: Regenerate.
64 2010-11-09 Janne Blomqvist <jb@gcc.gnu.org>
66 * io/unix.c (struct unix_stream): Add st_dev and st_ino members.
67 (fd_to_stream): Avoid unnecessary lseek() call, test isatty()
68 last. Make a token effort to support block devices.
69 (compare_file_filename): Use cached stat values.
70 (find_file0): Likewise.
71 (find_file): Likewise.
73 2010-11-09 Jerry DeLisle <jvdelisle@gcc.gnu.org>
76 * io/transfer.c (data_transfer_init): Do not call flush_if_preconnected
77 if this is an internal unit.
79 2010-11-04 Janne Blomqvist <jb@gcc.gnu.org>
82 * io/inquire.c (inquire_via_unit): Use stream_ttyname() instead of
83 calling ttyname() directly.
84 * io/unix.h (unix_stream): Move struct to unix.c.
85 * io/unix.c: Move struct unix_stream here.
86 (stream_ttyname): Don't mark the argument as unused if it is used.
88 2010-11-04 Janne Blomqvist <jb@gcc.gnu.org>
90 * io/unix.h (struct unix_stream): Remove prot member.
91 * io/unix.c: Remove PROT_READ and PROT_WRITE constants.
92 (fd_to_stream): Remove prot from argument list, don't set prot.
93 (open_external): Don't set prot flag.
94 (input_stream): Remove prot from argument list.
95 (output_stream): Likewise.
96 (error_stream): Likewise.
98 2010-11-03 Janne Blomqvist <jb@gcc.gnu.org>
100 * io/unix.h: Remove empty_internal_buffer prototype.
101 * io/unix.c (empty_internal_buffer): Remove unused function.
103 2010-11-03 Jerry DeLisle <jvdelisle@gcc.gnu.org>
106 * runtime/error.c (generate_warning): New function to generate a run
107 time warning message. Fix some whitespace.
108 * libgfortran.h: Add prototype for new function.
109 * io/list_read.c (nml_read_obj): Use new function to warn when a
110 character namelist object is truncated. Only warn if compiled
113 2010-11-02 Janne Blomqvist <jb@gcc.gnu.org>
116 * io/io.h: Remove setjmp.h include.
117 (st_parameter_dt): Change last_char to int, remove eof_jump.
118 * io/list_read.c (next_char): Return EOF instead of jumping.
119 (unget_char): Use int to be able to handle EOF.
120 (eat_spaces): Handle EOF return from next_char.
121 (eat_line): Likewise.
122 (eat_separator): Handle EOF return from next_char, eat_spaces,
124 (finish_separator): Likewise.
125 (convert_integer): Likewise.
126 (read_logical): Likewise.
127 (read_integer): Likewise.
128 (read_character): Likewise.
129 (parse_real): Likewise.
130 (read_complex): Likewise.
131 (read_real): Likewise.
132 (list_formatted_read_scalar): Likewise.
133 (list_formatted_read): Likewise.
134 (finish_list_read): Likewise.
135 (nml_parse_qualifier): Likewise.
136 (nml_match_name): Likewise.
137 (nml_get_obj_data): Likewise.
138 (namelist_read): Likewise.
139 * io/transfer.c (data_transfer_init): Initialize last_char.
140 (finalize_transfer): Remove jmp_buf setup.
142 2010-10-26 Jerry DeLisle <jvdelisle@gcc.gnu.org>
145 * io/list_read.c (nml_parse_qualifier): Add additional conditions for
146 setting the end index for loop specification. Fix some whitespace.
147 * io/write.c (write_default_char4): Const-ify the source argument.
149 2010-10-21 Thomas Koenig <tkoenig@gcc.gnu.org>
152 * m4/shape.m4 (shape_'rtype_kind`): Use variable for rank.
153 Allocate return array if unallocated.
154 * generated/shape_i4.c: Regenerated.
155 * generated/shape_i8.c: Regenerated.
156 * generated/shape_i16.c: Regenerated.
158 2010-10-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
161 * runtime/stop.c (stop_numeric_f08): New function.
162 (stop_numeric): Restore to previous behavior.
163 * gfortran.map: Add symbol _gfortran_stop_numeric_f08.
165 2010-10-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>
167 * io/io.h: Remove definition of the BT enumerator.
168 * libgfortran.h: Replace GFC_DTYPE enumerator with BT.
169 * intrinsics/iso_c_generated_procs.c: Likewise
170 * intrinsics/date_and_time.c: Likewise.
171 * intrinsics/iso_c_binding.c: Likewise.
172 * io/list_read.c: Likewise.
173 * io/transfer.c: Likewise.
174 * io/write.c: Likewise.
176 2010-10-16 Thomas Koenig <tkoenig@gcc.gnu.org>
181 * gfortran.map: Add _gfortran_transfer_array_write,
182 _gfortran_transfer_array_write, _gfortran_transfer_character_write,
183 _gfortran_transfer_character_wide_write,
184 _gfortran_transfer_complex_write,
185 _gfortran_transfer_integer_write,
186 _gfortran_transfer_logical_write and
187 _gfortran_transfer_real_write.
188 * io/transfer.c (transfer_integer_write): Add prototype and
189 function body as call to the original function, without the
191 (transfer_real_write): Likewise.
192 (transfer_logical_write): Likewise.
193 (transfer_character_write): Likewise.
194 (transfer_character_wide_write): Likewise.
195 (transfer_complex_write): Likewise.
196 (transfer_array_write): Likewise.
198 2010-09-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
201 * io/write.c (namelist_write_newline): Pad character array internal
202 unit records with spaces.
204 2010-09-21 Jerry DeLisle <jvdelisle@gcc.gnu.org>
207 * io/open.c (new_unit): On POSITION_APPEND don't seek if file length is
210 2010-09-14 Jerry DeLisle <jvdelisle@gcc.gnu.org>
213 * io/list_read.c (nml_get_obj_data): Set first_nl if the previous
216 2010-09-12 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
218 * intrinsics/pack_generic.c (pack): Add missing return and fix
220 * intrinsics/cshift0.c (cshift0): Fix whitespace.
221 * intrinsics/unpack_generic.c (unpack1, unpack0): Fix whitespace.
223 2010-09-10 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
225 * runtime/string.c (compare0): Remove.
226 (find_option): Inline string comparison
228 2010-09-09 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
230 * acinclude.m4 (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE,
231 LIBGFOR_CHECK_FOR_BROKEN_ISNAN,
232 LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY): Remove.
233 * configure.ac: Remove above checks.
234 * libgfortran.h: Define isnan, isinf, isfinite, isnormal and
235 signbit in terms of the respective built-ins.
236 * io/write_float.def (WRITE_FLOAT): Use signbit() instead of
238 * intrinsics/c99_functions.c (tgamma): Use isnan() instead of
240 * config.h.in: Regenerate.
241 * configure: Regenerate.
243 2010-09-06 Tobias Burnus <burnus@net-b.de>
246 * gfortran.map: Add new iany, iall and iparity intrinsics.
247 * Makefile.am: Ditto.
250 * m4/iparity.m4: New.
251 * Makefile.in: Regenerate.
252 * generated/iall_i1.c: Generate.
253 * generated/iall_i2.c: Generate.
254 * generated/iall_i4.c: Generate.
255 * generated/iall_i8.c: Generate.
256 * generated/iall_i16.c: Generate.
257 * generated/iany_i1.c: Generate.
258 * generated/iany_i2.c: Generate.
259 * generated/iany_i4.c: Generate.
260 * generated/iany_i8.c: Generate.
261 * generated/iany_i16.c: Generate.
262 * generated/iparity_i1.c: Generate.
263 * generated/iparity_i2.c: Generate.
264 * generated/iparity_i4.c: Generate.
265 * generated/iparity_i8.c: Generate.
266 * generated/iparity_i16.c: Generate.
268 2010-09-05 Tobias Burnus <burnus@net-b.de>
270 * m4/bessel.m4: Fix printf warning by casting to (long int).
271 * generated/bessel_r4.c:Regenerated.
272 * generated/bessel_r8.c: Regenerated.
273 * generated/bessel_r10.c: Regenerated.
274 * generated/bessel_r16.c: Regenerated.
276 2010-09-01 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
278 * intrinsics/execute_command_line.c: New file.
279 * gfortran.map (_gfortran_execute_command_line_i4,
280 _gfortran_execute_command_line_i8): New symbols.
281 * Makefile.am: Add new file intrinsics/execute_command_line.c.
282 * Makefile.in: Regenerated.
284 2010-08-29 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
286 * m4/mtype.m4 (upcase, hasmathfunc, mathfunc_macro): New macros.
287 * m4/fraction.m4: Use new macros to support quad-float types.
288 * m4/set_exponent.m4: Likewise.
289 * m4/spacing.m4: Likewise.
290 * m4/exponent.m4: Likewise.
291 * m4/nearest.m4: Likewise.
292 * m4/norm2.m4: Likewise.
293 * m4/bessel.m4: Likewise.
294 * m4/rrspacing.m4: Likewise.
295 * generated/bessel_r4.c:Regenerated.
296 * generated/bessel_r8.c: Regenerated.
297 * generated/bessel_r10.c: Regenerated.
298 * generated/bessel_r16.c: Regenerated.
299 * generated/exponent_r4.c: Regenerated.
300 * generated/exponent_r8.c: Regenerated.
301 * generated/exponent_r10.c: Regenerated.
302 * generated/exponent_r16.c: Regenerated.
303 * generated/fraction_r4.c: Regenerated.
304 * generated/fraction_r8.c: Regenerated.
305 * generated/fraction_r10.c: Regenerated.
306 * generated/fraction_r16.c: Regenerated.
307 * generated/nearest_r4.c: Regenerated.
308 * generated/nearest_r8.c: Regenerated.
309 * generated/nearest_r10.c: Regenerated.
310 * generated/nearest_r16.c: Regenerated.
311 * generated/norm2_r4.c: Regenerated.
312 * generated/norm2_r8.c: Regenerated.
313 * generated/norm2_r10.c: Regenerated.
314 * generated/norm2_r16.c: Regenerated.
315 * generated/rrspacing_r4.c: Regenerated.
316 * generated/rrspacing_r8.c: Regenerated.
317 * generated/rrspacing_r10.c: Regenerated.
318 * generated/rrspacing_r16.c: Regenerated.
319 * generated/set_exponent_r4.c: Regenerated.
320 * generated/set_exponent_r8.c: Regenerated.
321 * generated/set_exponent_r10.c: Regenerated.
322 * generated/set_exponent_r16.c: Regenerated.
323 * generated/spacing_r4.c: Regenerated.
324 * generated/spacing_r8.c: Regenerated.
325 * generated/spacing_r10.c: Regenerated.
326 * generated/spacing_r16.c: Regenerated.
328 2010-08-28 Tobias Burnus <burnus@net-b.de>
330 * mk-kinds-h.sh: Disable REAL(16) if REAL(10) is available.
332 2010-08-27 Tobias Burnus <burnus@net-b.de>
335 * libgfortran/m4/ifunction.m4 (FINISH_ARRAY_FUNCTION,
336 ARRAY_FUNCTION): Allow expression after loop.
337 * libgfortran/m4/norm2.m4: New for _gfortran_norm2_r{4,8,10,16}.
338 * libgfortran/m4/parity.m4: New for _gfortran_parity_l{1,2,4,8,16}.
339 * libgfortran/gfortran.map: Add new functions.
340 * libgfortran/Makefile.am: Ditto.
341 * libgfortran/m4/minloc1.m4: Add empty argument for ARRAY_FUNCTION.
342 * libgfortran/m4/maxloc1.m4: Ditto.
343 * libgfortran/m4/all.m4: Ditto.
344 * libgfortran/m4/minval.m4: Ditto.
345 * libgfortran/m4/maxval.m4: Ditto.
346 * libgfortran/m4/count.m4: Ditto.
347 * libgfortran/m4/product.m4: Ditto.
348 * libgfortran/m4/any.m4: Ditto.
349 * Makefile.in: Regenerated.
350 * generated/minval_r8.c: Regenerated.
351 * generated/maxloc1_4_r8.c: Regenerated.
352 * generated/minloc1_16_r16.c: Regenerated.
353 * generated/norm2_r4.c: Regenerated.
354 * generated/sum_i8.c: Regenerated.
355 * generated/parity_l2.c: Regenerated.
356 * generated/any_l16.c: Regenerated.
357 * generated/maxval_i2.c: Regenerated.
358 * generated/any_l2.c: Regenerated.
359 * generated/product_r4.c: Regenerated.
360 * generated/maxloc1_8_i4.c: Regenerated.
361 * generated/parity_l16.c: Regenerated.
362 * generated/all_l1.c: Regenerated.
363 * generated/product_i2.c: Regenerated.
364 * generated/minloc1_8_r16.c: Regenerated.
365 * generated/maxloc1_8_r16.c: Regenerated.
366 * generated/sum_r16.c: Regenerated.
367 * generated/sum_i1.c: Regenerated.
368 * generated/minloc1_4_r8.c: Regenerated.
369 * generated/maxloc1_16_r16.c: Regenerated.
370 * generated/minloc1_16_i4.c: Regenerated.
371 * generated/maxloc1_16_i4.c: Regenerated.
372 * generated/maxval_r16.c: Regenerated.
373 * generated/product_c10.c: Regenerated.
374 * generated/minloc1_8_i4.c: Regenerated.
375 * generated/all_l2.c: Regenerated.
376 * generated/product_c4.c: Regenerated.
377 * generated/sum_r4.c: Regenerated.
378 * generated/all_l16.c: Regenerated.
379 * generated/minloc1_16_r10.c: Regenerated.
380 * generated/sum_i2.c: Regenerated.
381 * generated/maxloc1_8_r8.c: Regenerated.
382 * generated/minval_i16.c: Regenerated.
383 * generated/parity_l4.c: Regenerated.
384 * generated/maxval_i4.c: Regenerated.
385 * generated/any_l4.c: Regenerated.
386 * generated/minval_i8.c: Regenerated.
387 * generated/maxloc1_4_i8.c: Regenerated.
388 * generated/minloc1_4_i16.c: Regenerated.
389 * generated/maxloc1_4_i16.c: Regenerated.
390 * generated/minloc1_8_r10.c: Regenerated.
391 * generated/product_i4.c: Regenerated.
392 * generated/maxloc1_8_r10.c: Regenerated.
393 * generated/sum_c16.c: Regenerated.
394 * generated/minloc1_16_r8.c: Regenerated.
395 * generated/maxloc1_16_r8.c: Regenerated.
396 * generated/count_4_l.c: Regenerated.
397 * generated/sum_r10.c: Regenerated.
398 * generated/count_8_l.c: Regenerated.
399 * generated/sum_c4.c: Regenerated.
400 * generated/maxloc1_16_r10.c: Regenerated.
401 * generated/minloc1_8_r8.c: Regenerated.
402 * generated/maxval_r10.c: Regenerated.
403 * generated/minval_i1.c: Regenerated.
404 * generated/maxloc1_4_i1.c: Regenerated.
405 * generated/minloc1_4_i8.c: Regenerated.
406 * generated/product_i16.c: Regenerated.
407 * generated/all_l4.c: Regenerated.
408 * generated/norm2_r16.c: Regenerated.
409 * generated/minval_r4.c: Regenerated.
410 * generated/maxloc1_4_r4.c: Regenerated.
411 * generated/sum_i4.c: Regenerated.
412 * generated/maxval_r8.c: Regenerated.
413 * generated/norm2_r8.c: Regenerated.
414 * generated/minloc1_4_i1.c: Regenerated.
415 * generated/minval_r16.c: Regenerated.
416 * generated/minval_i2.c: Regenerated.
417 * generated/maxloc1_4_i2.c: Regenerated.
418 * generated/product_r8.c: Regenerated.
419 * generated/maxloc1_8_i8.c: Regenerated.
420 * generated/sum_c10.c: Regenerated.
421 * generated/minloc1_4_r16.c: Regenerated.
422 * generated/maxloc1_4_r16.c: Regenerated.
423 * generated/count_1_l.c: Regenerated.
424 * generated/minloc1_4_r4.c: Regenerated.
425 * generated/minloc1_16_i8.c: Regenerated.
426 * generated/maxloc1_16_i8.c: Regenerated.
427 * generated/minloc1_4_i2.c: Regenerated.
428 * generated/maxloc1_8_i1.c: Regenerated.
429 * generated/minloc1_8_i8.c: Regenerated.
430 * generated/product_r16.c: Regenerated.
431 * generated/product_c8.c: Regenerated.
432 * generated/sum_r8.c: Regenerated.
433 * generated/norm2_r10.c: Regenerated.
434 * generated/minloc1_16_i16.c: Regenerated.
435 * generated/maxloc1_8_r4.c: Regenerated.
436 * generated/minloc1_16_i1.c: Regenerated.
437 * generated/maxloc1_16_i1.c: Regenerated.
438 * generated/minval_r10.c: Regenerated.
439 * generated/count_16_l.c: Regenerated.
440 * generated/parity_l8.c: Regenerated.
441 * generated/minloc1_8_i1.c: Regenerated.
442 * generated/minval_i4.c: Regenerated.
443 * generated/maxloc1_4_i4.c: Regenerated.
444 * generated/maxloc1_8_i2.c: Regenerated.
445 * generated/maxval_i8.c: Regenerated.
446 * generated/any_l8.c: Regenerated.
447 * generated/minloc1_4_r10.c: Regenerated.
448 * generated/minloc1_8_i16.c: Regenerated.
449 * generated/maxloc1_4_r10.c: Regenerated.
450 * generated/maxloc1_8_i16.c: Regenerated.
451 * generated/minloc1_16_r4.c: Regenerated.
452 * generated/maxloc1_16_r4.c: Regenerated.
453 * generated/product_i8.c: Regenerated.
454 * generated/sum_i16.c: Regenerated.
455 * generated/count_2_l.c: Regenerated.
456 * generated/maxloc1_16_i16.c: Regenerated.
457 * generated/minloc1_8_r4.c: Regenerated.
458 * generated/sum_c8.c: Regenerated.
459 * generated/minloc1_16_i2.c: Regenerated.
460 * generated/maxloc1_16_i2.c: Regenerated.
461 * generated/parity_l1.c: Regenerated.
462 * generated/maxval_i16.c: Regenerated.
463 * generated/maxval_i1.c: Regenerated.
464 * generated/minloc1_4_i4.c: Regenerated.
465 * generated/any_l1.c: Regenerated.
466 * generated/minloc1_8_i2.c: Regenerated.
467 * generated/product_c16.c: Regenerated.
468 * generated/product_r10.c: Regenerated.
469 * generated/product_i1.c: Regenerated.
470 * generated/all_l8.c: Regenerated.
471 * generated/maxval_r4.c: Regenerated.
473 2010-08-26 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
475 * config/fpu-387.h (has_sse): Remove cw_sse, unused.
476 Use fixed-length asm.
478 2010-08-23 Tobias Burnus <burnus@net-b.de>
481 * io/write.c (nml_write_obj, namelist_write): Cast argument
484 2010-08-21 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
486 * configure: Regenerate.
488 2010-08-19 Tobias Burnus <burnus@net-b.de>
492 * m4/bessel.m4: Implement bessel_jn and bessel_yn.
493 * gfortran.map: Add the generated bessel_jn_r{4,8,10,16}
494 and bessel_yn_r{4,8,10,16}.
495 * Makefile.am: Add bessel.m4.
496 * Makefile.in: Regenerated.
497 * generated/bessel_r4.c: Generated.
498 * generated/bessel_r16.c: Generated.
499 * generated/bessel_r8.c: Generated.
500 * generated/bessel_r10.c: Generated.
502 2010-08-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
505 * io/list_read.c (namelist_read): If namelist reading fails, use
506 generate_error and then continue the read loop.
508 2010-08-17 Jakub Jelinek <jakub@redhat.com>
511 * intrinsics/date_and_time.c (date_and_time): Pass __{zone,time,date}_len
512 instead of {ZONE,TIME,DATE}_LEN as second argument to fstrcpy. Drop
513 asserts. Adjust comment to the F2003 wording from the F95 wording.
515 2010-08-14 Jerry DeLisle <jvdelisle@gcc.gnu.org>
518 * io/inquire.c (inquire_via_unit): Add special case for __MINGW32__ to
519 return special file names CONIN$, CONOUT$, and CONERR$.
521 2010-08-07 Jerry DeLisle <jvdelisle@gcc.gnu.org>
524 * io/format.c: Remove fnode storage structure definitions, moving these
525 to format.h. (parse_format_list): Add check for data descriptors,
526 taking care of nested formats. Adjust calling parameters to pass a
527 check flag. (parse_format): Likewise.
528 * io/format.h: Add structures moved from format.c.
530 2010-08-02 Janne Blomqvist <jb@gcc.gnu.org>
532 * io/unit.c (update_position): Don't update the position flag for
533 non-seekable files, check for stell() error.
535 2010-08-01 Janne Blomqvist <jb@gcc.gnu.org>
537 * io/unix.c (file_exists): Use access(2) instead of stat(2) to
539 (fallback_access): Move up in file, implement F_OK.
541 2010-07-31 David Edelsohn <edelsohn@gnu.org>
543 * io/inquire.c: Include io.h before string.h.
545 2010-07-28 Jerry DeLisle <jvdelisle@gcc.gnu.org>
548 * io/inquire.c (inquire_via_unit): Use ttyname to return actual device
549 file name for stdin, stdout, and stderr. If ttyname does not succeed
550 fall back to default names for these units. Include string.h to allow
551 using strlen function.
552 * unix.c: Remove typedef of unix_stream structure, move to unix.h.
553 * unix.h: Add typedef of unix_stream structure so that it is
554 accessible to inquire.c.
556 2010-07-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
559 * io/unix.c (mem_alloc_w4): Return gfc_char4_t instead of char type
560 pointer. (mem_write4): Remove cast to gfc_char4_t.
561 * io/transfer.c (write_block): Use a gfc_char4_t pointer.
562 (memset4): New helper function. (next_record_w): Use new helper
563 function rather than sset for internal units. Don't attempt to pad
564 with spaces if it is not needed.
565 * io/unix.h: Update prototype for mem_alloc_w4.
566 * io/write.c (memset4): Use gfc_char4_t pointer and chracter type.
567 Don't use multiply by 4 to compute offset. (memcpy4): Likewise.
568 (write_default_char4): Use a gfc_char4_t pointer and update memset4
569 and memcpy calls. (write_a): Likewise. (write_l): Likewise.
570 (write_boz): Likewise. (write_decimal): Likewise. (write_x): Likewise.
571 (write_char): Add support for character(kind=4) internal units that
572 was previously missed. (write_integer): Use a gfc_char4_t pointer and
573 update memset4 and memcpy calls. (write_character): Likewise.
574 (write_separator): Add support for character(kind=4) internal units
575 that was previously missed.
576 * write_float.def (output_float): Use a gfc_char4_t pointer and
577 update memset4 and memcpy calls. (write_infnan): Likewise.
578 (output_float_FMT_G_): Likewise.
580 2010-07-16 Jerry DeLisle <jvdelisle@gcc.gnu.org>
583 * io/read.c (read_default_char4): Add support for reading into a
584 kind-4 character variable from a character(kind=4) internal unit.
585 * io/io.h (read_block_form4): Add prototype.
586 * io/unit.c (get_internal_unit): Add call to fbuf_init.
587 (free_internal_unit): Add call to fbuf_destroy. (get_unit): Fix
589 * io/transfer.c (read_sf_internal): Use fbuf_alloc to allocate a string
590 to recieve the wide characters translated to single byte chracters.
591 (read_block_form): Fix whitespace. (read_block_form4): New function to
592 read from a character(kind=4) internal unit into a character(kind=4)
593 variable. (read_block_direct): Fix whitespace. (write_block): Fix
594 whitespace. (formatted_transfer_scalar_read): Likewise.
595 (formatted_transfer_scalar_write): Likewise.
596 * io/write.c (write_character): Add support for list directed write of
597 a kind=1 character string to a character(kind=4) internal unit.
599 2010-07-14 Jerry DeLisle <jvdelisle@gcc.gnu.org>
602 * io/file_pos.c (st_endfile): Correctly set unit flags for form.
603 * io/transfer.c (data_transfer_init): Fix indentation of whitespace.
605 2010-07-12 Jerry DeLisle <jvdelisle@gcc.gnu.org>
608 * io/read.c: Fix comment.
609 * io/io.h (is_char4_unit): New macro.
610 * io/unit.c (get_internal_unit): Call new function open_internal4.
611 * io/unix.c (mem_alloc_r4): New function. (mem_alloc_w4): New function.
612 (mem_read4): New function, temporary stub. (mem_write4): New function.
613 (open_internal4): New function to set stream pointers to use the new
615 * io/transfer.c (write_block): Use new mem_alloc_w4 to access internal
617 * io/unix.h: Add prototypes for open_internal4, mem_alloc_w4, and
619 * io/write.c (memset4): New helper function. (memcpy4): New helper
620 function. (write_default_char4): Use new helper functions.
621 (write_a): Likewise. (write_l): Likewise. (write_boz): Likewise.
622 (write_decimal): Likewise. (write_x): Likewise.
623 (write_integer): Likewise.
624 * io/write_float.def (output_float): Add code blocks to handle internal
625 unit kind=4 output utilizing gfc_char4_t pointers. (write_infnan): Use
626 new helper functions. (OUTPUT_FLOAT_FMT_G): Update this macro likewise.
628 2010-07-12 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
630 * config/fpu-387.h [__sun__ && __svr4__] Include <signal.h>,
632 (sigill_caught): New.
633 (sigill_hdlr): New function
634 (has_sse) [__sun__ && __svr4__]: Check if SSE instruction causes
637 2010-07-11 Kai Tietz <kai.tietz@onevision.com>
640 * io/unix.c (flush_buf): Add _commit for WIN32.
642 2010-06-28 Tobias Burnus <burnus@net-b.de>
645 * list_read.c (parse_real): Do not pass (..) on for NAN(..).
646 * read.c (convert_real): Fix comment about NAN/INF.
648 2010-07-02 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
650 * configure.ac (gfortran_use_symver): Only check for Sun-style symbol
651 versioning on Solaris 2.
652 * configure: Regenerate.
654 2010-07-02 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
656 * configure.ac: Check for Sun symbol versioning.
657 * configure: Regenerate.
659 * Makefile.am [LIBGFOR_USE_SYMVER]: Protect version_arg with
660 LIBGFOR_USE_SYMVER_GNU.
662 [LIBGFOR_USE_SYMVER_SUN]: Handle Sun symbol versioning.
663 [!LIBGFOR_USE_SYMVER]: Add version_dep.
664 (libgfortran_la_DEPENDENCIES): Set to $(version_dep).
665 * Makefile.in: Regenerate.
667 2010-06-29 Jerry DeLisle <jvdelisle@gcc.gnu.org>
670 * io/read.c: Add code to parse and read Inf, Infinity, NaN, and Nan with
671 optional parenthesis.
673 2010-06-28 Tobias Burnus <burnus@net-b.de>
676 * list_read.c (parse_real, read_real): Support NAN(alphanum).
678 2010-06-25 Tobias Burnus <burnus@net-b.de>
680 * intrinsics/selected_real_kind.f90
681 (_gfortran_selected_real_kind2008): Add function.
682 (_gfortran_selected_real_kind): Stub which calls
683 _gfortran_selected_real_kind2008.
684 * gfortran.map (GFORTRAN_1.4): Add
685 _gfortran_selected_real_kind2008.
686 * mk-srk-inc.sh: Save also RADIX.
688 2010-06-25 Tobias Burnus <burnus@net-b.de>
690 * runtime/compile_options.c (init_compile_options): Update
691 compile_options.allow_std for GFC_STD_F2008_OBS.
692 * io/transfer.c (formatted_transfer_scalar_read,
693 formatted_transfer_scalar_write): Fix allow_std check.
694 * io/list_read.c (nml_parse_qualifier): Ditto.
696 2010-06-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>
699 * io/file_pos.c (st_endfile): Add check for ENDFILE when file is
700 already positioned after the EOF marker. Use find_or_create_unit
701 instead of find_unit. If unit is not connected, connect it and create
702 the file with default settings.
703 * io/transfer.c (data_transfer_init): Add check for attempted READ or
704 WRITE when file is already positioned after the EOF marker.
706 2010-06-10 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
708 * intrinsics/selected_char_kind.c (selected_char_kind): Fix
709 return value for ISO_10646.
711 2010-06-09 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
713 * mk-kinds-h.sh: Define GFC_REAL_*_LITERAL_SUFFIX and
714 GFC_REAL_*_LITERAL macros for each kind.
715 * intrinsics/cpu_time.c (cpu_time_4, cpu_time_8, cpu_time_10,
716 cpu_time_16): Use them.
717 * intrinsics/random.c (rnumber_4, rnumber_8, rnumber_10,
718 rnumber_16): Likewise.
720 2010-06-09 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
722 * intrinsics/system_clock.c (system_clock_4, system_clock_8):
725 2010-06-04 Thomas Koenig <tkoenig@gcc.gnu.org>
728 * intrinsics/date_and_time.c: Replace assert with runtime_error
729 when VALUE is too small.
731 2010-05-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
734 * runtime/stop.c (stop_string): Make sure nothing is emitted for
737 2010-05-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
740 * runtime/stop.c (error_stop_numeric): New function and updated comment.
741 Add declaration for stop_numeric and remove declaration for stop_string.
742 (stop_string): Use for blank STOP.
743 (stop_numeric): Remove use of special -1 stop code.
744 * runtime/pause.c (do_pause): Use stop_string for blank stop.
745 (pause_numeric): Remove use of special -1 pause code.
746 * gfortran.map: Add new symbol to run-time library.
747 * libgfortran.h: Move declaration for stop_string to here to make
748 function visible for do_pause. Remove declaration for stop_numeric.
750 2010-05-08 Janne Blomqvist <jb@gcc.gnu.org>
752 * io/unix.h (mem_alloc_r): Fix typo to reduce visibility.
754 2010-05-07 Janne Blomqvist <jb@gcc.gnu.org>
756 * libgfortran.h (free_mem): Remove prototype.
757 * runtime/memory.c (free_mem): Remove function.
758 * intrinsics/date_and_time.c (secnds): Replace free_mem() with
760 * io/fbuf.c (fbuf_destroy): Likewise.
761 * io/format.c (free_format_hash_table): Likewise.
762 (save_parsed_format): Likewise.
763 (free_format_data): Likewise.
764 * io/list_read.c (free_saved): Likewise.
765 (free_line): Likewise.
766 (nml_touch_nodes): Likewise.
767 (nml_read_obj): Likewise
768 * io/lock.c (free_ionml): Likewise.
769 * io/open.c (new_unit): Likewise.
770 (already_open): Likewise.
771 * io/unit.c (destroy_unit_mutex): Likewise.
772 (free_internal_unit): Likewise.
773 (close_unit_1): Likewise.
774 * io/unix.c (raw_close): Likewise.
775 (buf_close): Likewise.
776 (mem_close): Likewise.
777 (tempfile): Likewise.
778 * io/write.c (nml_write_obj): Likewise.
779 * io/write_float.def (output_float_FMT_G_##): Likewise.
780 * runtime/error.c (show_locus): Likewise.
782 2010-05-04 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
785 * configure.ac (AM_INIT_AUTOMAKE): Add no-dist.
786 * configure: Regenerate.
787 * Makefile.in: Regenerate.
789 2010-04-30 Kai Tietz <kai.tietz@onevision.com>
792 * io/unix.c (raw_truncate): Explicit cast from integer-scalar
794 (tempfile): Use for mingw GetTempPath and avoid double slash
797 2010-04-24 Kai Tietz <kai.tietz@onevision.com>
800 * io/unix.c (tempfile): Correct logic for mktemp case.
802 2010-04-06 Tobias Burnus <burnus@net-b.de>
805 * runtime/stop.c (error_stop_string): New function.
806 * gfortran.map (_gfortran_error_stop_string): Add.
808 2010-04-02 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
810 * Makefile.in: Regenerate.
811 * aclocal.m4: Regenerate.
813 2010-04-01 Janne Blomqvist <jb@gcc.gnu.org>
816 * io/intrinsics.c (gf_ftell): New function, seek to correct offset.
817 (ftell): Call gf_ftell.
818 (FTELL_SUB): Likewise.
820 2010-04-01 Paul Thomas <pault@gcc.gnu.org>
822 * io/transfer.c : Update copyright.
827 * io/inquire.c : ditto
828 * io/format.c : ditto
829 * io/list_read.c : ditto
830 * runtime/error.c : ditto
831 * libgfortran.h : ditto
832 * intrinsics/date_and_time.c: ditto
833 * intrinsics/args.c : ditto
835 2010-04-01 Janne Blomqvist <jb@gcc.gnu.org>
838 * io/intrinsics.c (ftell): Reset fbuf, correct offset.
839 (FTELL_SUB): Likewise.
841 2010-03-29 Jerry DeLisle <jvdelisle@gcc.gnu.org>
844 * io/transfer.c (next_record_r): Only call hit_eof for specific
845 conditions when an EOF is encountered.
847 2010-03-29 Tobias Burnus <burnus@net-b.de>
850 * io/unix.c (buf_write): Set physical_offset after lseek.
852 2010-03-25 Jerry DeLisle <jvdelisle@gcc.gnu.org>
855 * io/read.c (read_x): Return if seen EOR condition.
857 2010-03-21 Jerry DeLisle <jvdelisle@gcc.gnu.org>
860 * io/io.h: Fix type of size in st_parameter_inquire structure.
862 2010-03-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
865 * io/unix.h: Add prototype for new function to return file size.
866 * io/unix.c (file_size): New function.
867 * io/inquire.c (inquire_via_unit): Use new function.
868 (inquire_via_filename): Use new function.
870 2010-03-17 Jerry DeLisle <jvdelisle@gcc.gnu.org>
872 * io/transfer.c (read_sf_internal): Remove stray function declaration
873 used during debugging.
875 2010-03-17 Jerry DeLisle <jvdelisle@gcc.gnu.org>
878 * io/io.h: Delete prototype for read_sf, making it static.
879 * io/read.c (read_x): Modify to call hit_eof if PAD="no".
880 * io/transfer.c (read_sf_internal): New static function extracted from
881 read_sf for use on internal units only. Handle empty string case.
882 (read_sf): New factoring of this function, make it static. Add special
883 conditions for EOF based on ADVANCE="no", PAD="no", and whether any
884 bytes have been previously read from the record.
885 (read_block_form): Modify to call read_sf or read_sf_internal.
886 (next_record_r): Add a done flag similar to next_record_w. Call hit_eof
887 if internal array unit next record returns finished, meaning an EOF was
888 found and not done, ie not the last record expected. For external
889 units call hit_eof if item_count is 1 or there are no pending spaces.
890 (next_record): Update call to next_record_r.
892 2010-03-12 Kai Tietz <kai.tietz@onevision.com>
895 * io/format.c (parse_format_list): Add to ERROR, WARNING,
896 SILENT enumerators NOTIFICATION_ prefix.
897 * runtime/error.c (notification_std): Likewise.
898 * libgfortran.h (notification): Likewise.
899 (GFC_LARGEST_BUF): Check for HAVE_GFC_INTEGER_16.
901 2010-03-11 Tobias Burnus <burnus@net-b.de>
904 * io/list_read.c (nml_parse_qualifier): Disable expanded_read
907 2010-03-10 Jerry DeLisle <jvdelisle@gcc.gnu.org>
910 * io/transfer.c (next_record_r): Add hit_eof based on item_count
913 2010-03-09 Jerry DeLisle <jvdelisle@gcc.gnu.org>
916 * io/read.c: Include fbuf.h and unix.h to enable lower level I/O for
917 read_x. (read_x): Replace the use of read_sf with equivalent lower level
918 I/O, eliminating unneeded code and handling EOF and EOR conditions.
919 * io/io.h: Revise prototype for read_sf.
920 * io/transfer.c (read_sf): Delete no_error parameter and all uses of it.
921 (read_block_form): Likewise.
922 (next_record_r): Delete wrong code call to hit_eof.
924 2010-03-08 Kai TIetz <kai.tietz@onevision.com>
927 * libgfortran.h (_POSIX): Define if __MINGW32__ is defined.
928 (gfc_printf): Define to gnu_printf for __MINGW32__ case,
929 otherwise to __printf__.
930 (gfc_strtof,gfc_strtod,gfc_strtold): Define for mingw case
931 to POSIX compatible converter functions.
932 (runtime_error): Use instead gfc_printf as formatter
934 (runtime_error_at): Likewise.
935 (runtime_warning_at): Likewise.
936 (st_printf): Likewise.
937 * intrinsics/date_and_time.c (localtime_r): Undefine
938 possible defined macro.
939 (gmtime_r): Likewise.
940 * io/read.c (convert_real): Use gfc_strtof, gfc_strtod,
943 2010-02-24 Jerry DeLisle <jvdelisle@gcc.gnu.org>
946 * io/transfer.c (require_type): Subtract one from item_count for output
947 of error message. Add comment before formatted_transfer function
948 explaining why the item_count is off by one.
950 2010-02-24 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
952 * io/write_float.def (WRITE_FLOAT): Use __builtin_signbit.
954 2010-02-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
956 * io/list_read.c (list_formatted_read_scalar): Remove duplicate code.
958 2010-02-09 Tobias Burnus <burnus@net-b.de>
961 * intrinsics/args.c (get_command_argument_i4): Always return
962 commandline-argument length for length parameter.
964 2010-02-06 Jerry DeLisle <jvdelisle@gcc.gnu.org>
967 * io/format.c (reset_fnode_counters): Use the correct pointer to the
968 head of the fnode list. (parse_format): Remove previous hack that set
969 limit on size of format string for caching.
971 2010-02-06 Jerry DeLisle <jvdelisle@gcc.gnu.org>
974 * io/transfer.c (read_sf): Handle EOR and EOF conditions for
975 ADVANCE="no" with PAD="yes" or PAD="no".
977 2010-02-03 Jerry DeLisle <jvdelisle@gcc.gnu.org>
980 * io/list_read.c (nml_get_obj_data): Add new qualifier flag, clean up
981 code, and adjust logic to set namelist info pointer correctly for array
982 qualifiers of derived type components.
984 2010-01-15 Jerry DeLisle <jvdelisle@gcc.gnu.org>
987 * io/format.c (parse_format): Set limit on size of format strings that
990 2010-01-05 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
992 * configure: Regenerate.
994 2010-01-03 Janne Blomqvist <jb@gcc.gnu.org>
997 * io/unix.c: Defines for MINGW stat and fstat.
998 (gfstat_t): New typedef.
999 (id_from_fd): Use gfstat_t instead of struct stat.
1000 (fd_to_stream): Likewise.
1001 (compare_file_filename): Likewise.
1002 (find_file): Likewise.
1003 (file_exists): Likewise.
1004 (inquire_sequential): Likewise.
1005 (inquire_direct): Likewise.
1006 (inquire_formatted): Likewise.
1009 Copyright (C) 2010 Free Software Foundation, Inc.
1011 Copying and distribution of this file, with or without modification,
1012 are permitted in any medium without royalty provided the copyright
1013 notice and this notice are preserved.