1 2014-03-21 Jerry DeLisle <jvdelisle@gcc.gnu>
4 * io/transfer.c (data_transfer_init): If std= was specified, set
5 delim status to DELIM_NONE of no other was specified.
7 2014-03-18 Ulrich Weigand <Ulrich.Weigand@de.ibm.com>
9 * configure.ac: Check for presence of fcntl.
10 * configure: Regenerate.
11 * config.h.in: Regenerate.
12 * io/unix.c (set_close_on_exec): Check for HAVE_FCNTL.
14 2014-03-17 Jerry DeLisle <jvdelisle@gcc.gnu>
17 * io/list_read.c (list_formatted_read_scalar): Do not use
18 eat_separator. Explicitly set the comma and end-of-line flags.
19 Check for END condition from finish_separator.
21 2014-03-15 Jerry DeLisle <jvdelisle@gcc.gnu>
24 * io/list_read.c (finish_list_read): Read one character to check
25 for the end of the file. If it is the end, then issue the file
26 end error message. If not, use eat_line to reach the end
27 without giving error. The next attempt to read will then
28 issue the error as described above.
30 2014-03-12 Jerry DeLisle <jvdelisle@gcc.gnu>
33 * io/read.c (read_decimal): Quickly skip spaces to avoid calls
35 * io/unit.c (is_trim_ok): New helper function to check various
36 conditions to see if its OK to trim the internal unit string.
37 (get_internal_unit): Use LEN_TRIM to shorten selected internal
38 unit strings for optimizing READ. Enable this optimization for
40 * io/list_read.c (finish_list_read): Don't call eat_line for
43 2014-03-08 Jerry DeLisle <jvdelisle@gcc.gnu>
46 * io/list_read.c (next_char): Mark unlikely error checks.
47 (eat_spaces): For character array reading, skip ahead over
48 spaces rather than call next_char multiple times.
50 2014-03-08 Tobias Burnus <burnus@net-b.de>
52 * libgfortran.h (unlikely, likely): Add usage comment.
54 2014-03-08 Dominique d'Humieres <dominiq@lps.ens.fr>
57 * io/write_float.def (output_float): Remove unused variable
58 nzero_real. Replace a double space with a single one.
59 (determine_en_precision): Fix wrong handling of the EN format.
61 2014-03-03 Jerry DeLisle <jvdelisle@gcc.gnu>
64 * io/inquire.c (inquire_via_unit): In the case of
65 DELIM_UNSPECIFIED set inquire return string to "NONE".
66 * io/list_read.c (read_character): In the case of DELIM_NONE and
67 namelists, complete the character read using the namelist
69 * io/open.c (new_unit): Don't set delim status to none if not
70 specified so that DELIM_UNSPECIFIED can be used later.
71 * io/transfer.c (data_transfer_init): For namelist I/O, if the
72 unit delim status is unspecified set the current status to quote.
73 Otherwise, set current status to the unit status.
74 * io/unit.c (get_internel_unit, init_unit): Remember to set
75 flags_delim initially to DELIM_UNSPECIFIED so defaults come out
77 * io/write.c (write_character): Add a new function argument
78 "mode" to signify that raw output is to be used vs output with
79 delimiters. If the mode is set to DELIM (1) proceed with
80 delimiters. (list_formatted_write_scalar): Write the separator
81 only if a delimiter was previously specified. Update the call to
82 write_character with the mode argument given.
83 (namelist_write_newline): Use the mode argument. (nml_write_obj):
84 Use the mode argument. Remove use of tmp_delim. Write the
85 semi-colon or comma correctly only when needed with using
86 delimiters. Cleanup whitespace.
87 (namelist_write): If delim is not specified in namelist I/O,
88 default to using quotes. Get rid of the tmp_delim variable and
89 use the new mode argument in write_character.
91 2014-02-21 Tobias Burnus <burnus@net-b.de>
94 * libgfortran/io/inquire.c (yes, no): New static const char vars.
95 (inquire_via_unit): Use them. Use OPEN mode instead of using
96 POSIX's access to query about write=, read= and readwrite=.
98 2014-01-20 Jerry DeLisle <jvdelisle@gcc.gnu>
99 Dominique d'Humieres <dominiq@lps.ens.fr>
101 * io/write_float.def (output_float): Remove inadvertent test
102 code from previous patch.
104 2014-01-19 Jerry DeLisle <jvdelisle@gcc.gnu>
105 Dominique d'Humieres <dominiq@lps.ens.fr>
110 * io/write_float.def (output_float): Fix wrong handling of the
112 (output_float_FMT_G_): Fixes rounding issues with -m32.
114 2014-01-11 Jerry DeLisle <jvdelisle@gcc.gnu>
115 Dominique d'Humieres <dominiq@lps.ens.fr>
116 Steven G. Kargl <kargl@gcc.gnu.org>
120 * io/io.h (struct st_parameter_dt): Assign expanded_read flag to
121 unused bit. Define new variable line_buffer_pos.
122 * io/list_read.c (free_saved, next_char, l_push_char,
123 read_logical, read_real): Replace use of item_count with
124 line_buffer_pos for line_buffer look ahead.
125 (read_logical, read_integer, parse_real, read_real, check_type):
126 Adjust location of free_line to after generating error messages
127 to retain the correct item count for the message.
129 2014-01-02 Richard Sandiford <rdsandiford@googlemail.com>
131 Update copyright years
133 2013-12-18 Steven G. Kargl <kargl@gcc.gnu.org>
135 * io/read.c (read_f): Convert assert to runtime error.
137 2013-12-17 Andreas Tobler <andreast@gcc.gnu.org>
139 * io/unix.c (tempfile_open): Only use the needed flag O_CLOEXEC.
141 2013-12-16 Jerry DeLisle <jvdelisle@gcc.gnu>
144 * io/file_pos.c (st_rewind): Do proper return after
146 * io/open.c (edit_modes): Move action code inside block that
147 checks for library ok. (new_unit): Do cleanup after error.
148 (st_open): Do proper return after error.
149 * io/transfer.c (data_transfer_init): Likewise.
151 2013-12-11 Tobias Burnus <burnus@net-b.de>
153 * config/fpu-387.h (sigill_hdlr, get_fpu_rounding_mode): Emit SSE
154 instructions when __SSE_MATH__ is defined.
156 2013-12-06 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
158 * intrinsics/erfc_scaled.c (_M_2_SQRTPI): Define if missing.
160 2013-12-01 Uros Bizjak <ubizjak@gmail.com>
163 * intrinsics/erfc_scaled.c (erfc_scaled_r16): Also provide for
164 quadruple precision long double variant.
166 2013-11-20 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
168 * intrinsics/erfc_scaled.c (erfc_scaled_r16): Don't define if
169 __float128 is not available.
171 2013-11-20 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
174 * intrinsics/erfc_scaled.c (erfc_scaled_r16): New function.
175 * intrinsics/erfc_scaled_inc.c: Do not provide quadruple
178 2013-11-18 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
181 * intrinsics/unpack_generic.c (unpack_internal): Let the compiler
182 know that dim > 0 to avoid warnings.
184 2013-11-15 Janne Blomqvist <jb@gcc.gnu.org>
185 Jerry DeLisle <jvdelisle@gcc.gnu.org>
188 * io/unix.c (regular_file): Don't set O_CREAT when opening a file
189 read-only with unknown status. Mask out O_CREAT when falling back
190 to opening read-only if ACTION= is not set and read-write fails.
192 2013-11-15 Steve Ellcey <sellcey@mips.com>
194 * configure.ac: Do not define HAVE_STRTOLD.
195 * configure: Regenerate.
197 2013-11-10 Janne Blomqvist <jb@gcc.gnu.org>
199 * configure.ac: Check presence of mkostemp.
200 * io/unix.c (set_close_on_exec): New function.
201 (tempfile_open): Use mkostemp and O_CLOEXEC if available, fallback
202 to calling set_close_on_exec.
203 (regular_file): Add O_CLOEXEC to flags if defined.
204 (open_external): Call set_close_on_exec if O_CLOEXEC is not
206 * config.h.in: Regenerated.
207 * configure: Regenerated.
208 * Makefile.in: Regenerated.
209 * aclocal.m4: Regenerated.
211 2013-10-01 Tobias Burnus <burnus@net-b.de>
214 * io/list_read (parse_repeat, read_integer, read_character,
215 parse_real, read_real, check_type, list_formatted_read_scalar,
216 finish_list_read): Call list_free.
218 2013-09-20 Alan Modra <amodra@gmail.com>
220 * configure: Regenerate.
222 2013-07-23 Uros Bizjak <ubizjak@gmail.com>
224 * config/fpu-387.h (get_fpu_rounding_mode): Read rounding mode
225 from SSE mxcsr register on x86_64.
227 2013-07-21 Ondřej Bílka <neleai@seznam.cz>
229 * io/transfer.c: Fix comment typos.
231 2013-07-21 Tobias Burnus <burnus@net-b.de>
234 * config/fpu-387.h (set_fpu_rounding_mode,
235 get_fpu_rounding_mode): Add missing _ to fix build.
237 2013-07-21 Tobias Burnus <burnus@net-b.de>
238 Uros Bizjak <ubizjak@gmail.com>
241 * libgfortran.h (set_fpu_rounding_mode,
242 get_fpu_rounding_mode): New prototypes.
243 * config/fpu-387.h (set_fpu_rounding_mode,
244 get_fpu_rounding_mode): New functions.
245 * config/fpu-aix.h (set_fpu_rounding_mode,
246 get_fpu_rounding_mode): Ditto.
247 * config/fpu-generic.h (set_fpu_rounding_mode,
248 get_fpu_rounding_mode): Ditto.
249 * config/fpu-glibc.h (set_fpu_rounding_mode,
250 get_fpu_rounding_mode): Ditto.
251 * config/fpu-sysv.h (set_fpu_rounding_mode,
252 get_fpu_rounding_mode): Ditto.
253 * configure.ac: Check for fp_rnd and fp_rnd_t.
254 * io/io.h (enum unit_round): Use GFC_FPE_* for the value.
255 * io/read.c (convert_real): Set FP ronding mode.
256 * Makefile.in: Regenerate.
257 * aclocal.m4: Regenerate.
258 * config.h.in: Regenerate.
259 * configure: Regenerate.
261 2013-06-24 Tobias Burnus <burnus@net-b.de>
263 * configure.ac: Check for fp_except and fp_except_t.
264 * config/fpu-sysv.h: Conditionally use either type.
265 * configure: Regenerate.
266 * config.h.in: Regenerate.
268 2013-06-21 Eric Botcazou <ebotcazou@adacore.com>
270 * config/fpu-sysv.h (get_fpu_except_flags): Fix typo.
272 2013-06-20 Uros Bizjak <ubizjak@gmail.com>
274 * config/fpu-387.h (_FPU_MASK_ALL): New.
275 (_FPU_EX_ALL): Ditto.
276 (set_fpu): Use fstcw to store x87 FPU control word. Use fnclex to
277 clear stalled exception flags. Correctly clear stalled SSE
278 exception flags. Simplify code.
279 (get_fpu_except_flags): Simplify code.
281 2013-06-20 Tobias Burnus <burnus@net-b.de>
284 * io/list_read.c (next_char, eat_separator): Don't set EOL for \r.
286 2013-06-19 Uros Bizjak <ubizjak@gmail.com>
288 * config/fpu-387.h: Use __asm__ and __volatile__ consistently.
289 (get_fpu_except_flags): Initialize result.
291 2013-06-17 Tobias Burnus <burnus@net-b.de>
293 * libgfortran.h (compile_options_t) Add fpe_summary.
294 (get_fpu_except_flags): New prototype.
295 * runtime/compile_options.c (set_options, init_compile_options):
297 * runtime/stop.c (report_exception): New function.
298 (stop_numeric, stop_numeric_f08, stop_string, error_stop_string,
299 error_stop_numeric): Call it.
300 * config/fpu-387.h (get_fpu_except_flags): New function.
301 * config/fpu-aix.h (get_fpu_except_flags): New function.
302 * config/fpu-generic.h (get_fpu_except_flags): New function.
303 * config/fpu-glibc.h (get_fpu_except_flags): New function.
304 * config/fpu-sysv.h (get_fpu_except_flags): New function.
305 * configure.ac: Check for fpxcp.h.
306 * configure: Regenerate.
307 * config.h.in: Regenerate.
309 2013-06-01 Tobias Burnus <burnus@net-b.de>
312 * io/write_float.def (ISFINITE2Q, ISFINITE2, ISFINITE2L, ISFINITE,
313 SIGNBIT2Q, SIGNBIT2, SIGNBIT2L, SIGNBIT, ISNAN2Q, ISNAN2, ISNAN2L,
315 (output_float_FMT_G_,WRITE_FLOAT): Use them.
317 2013-05-24 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
319 * acinclude.m4 (libgfor_cv_have_as_needed): Check for -z ignore, too.
320 * configure: Regenerate.
322 2013-05-05 David Edelsohn <dje.gcc@gmail.com>
324 * caf/libcaf.h (_gfortran_caf_critical): Add a prototype.
325 (_gfortran_caf_end_critical): Same.
327 2013-05-04 David Edelsohn <dje.gcc@gmail.com>
329 * runtime/environ.c: Include unistd.h.
330 * runtime/pause.c: Test HAVE_UNISTD_H.
331 * runtime/stop.c: Same.
334 * io/read.c (si_max): Protect declaration of value.
336 2013-04-29 Janne Blomqvist <jb@gcc.gnu.org>
338 * intrinsics/system_clock (gf_gettime_mono): Use variable
339 resolution for fractional seconds argument.
340 (system_clock_4): Simplify, update for gf_gettime_mono change.
341 (system_clock_8): Likewise.
343 2013-04-29 Janne Blomqvist <jb@gcc.gnu.org>
346 * io/transfer.c (next_record_w_unf): First fix head marker, then
348 (next_record): Call flush_if_unbuffered.
349 * io/unix.c (struct unix_stream): Add field unbuffered.
350 (flush_if_unbuffered): New function.
351 (fd_to_stream): New argument.
352 (open_external): Fix fd_to_stream call.
353 (input_stream): Likewise.
354 (output_stream): Likewise.
355 (error_stream): Likewise.
356 * io/unix.h (flush_if_unbuffered): New prototype.
358 2013-04-28 Janne Blomqvist <jb@gcc.gnu.org>
360 * intrinsics/system_clock.c (system_clock_4): Fix sign error in
363 2013-04-15 Tobias Burnus <burnus@net-b.de>
365 * list_read.c (finish_separator): Initialize variable.
367 2013-04-15 Janne Blomqvist <jb@gcc.gnu.org>
370 * intrinsics/time_1.h: Check __CYGWIN__ in addition to
372 * intrinsics/system_clock.c (GF_CLOCK_MONOTONIC): Check
373 _POSIX_MONOTONIC_CLOCK as well.
374 (system_clock_4): Use GetTickCount on Windows.
375 (system_clock_8): Use QueryPerformanceCounter and
376 QueryPerformanceCounterFrequency on Windows.
378 2013-04-04 Tobias Burnus <burnus@net-b.de>
381 * io/list_read.c (check_type): Fix kind checking for COMPLEX.
383 2013-04-01 Jerry DeLisle <jvdelisle@gcc.gnu.org>
386 * io/list_read.c (nml_read_obj): Do not reset the read error flag
387 inside nml_read_obj. If the read error flag is found set just exit.
388 Fix some whitespace on comments.
389 (nml_read_obj_data): Reset the read error flag before the first call
392 2013-03-31 Jerry DeLisle <jvdelisle@gcc.gnu.org>
395 * io/list_read.c (nml_parse_qualifier): Remove spurious next_char call
396 when checking for EOF. Use error return mechanism when EOF detected.
397 Do not return false unless parse_err_msg and parse_err_msg_size have
398 been set. Use hit_eof.
399 (nml_get_obj_data): Likewise use the correct error mechanism.
400 * io/transfer.c (hit_eof): Do not set AFTER_ENDFILE if in namelist
403 2013-03-29 Tobias Burnus <burnus@net-b.de>
406 * io/format.c (parse_format_list): Also cache FMT_STRING.
407 (parse_format): Update call.
409 2013-03-29 Tobias Burnus <burnus@net-b.de>
412 * io/format.c (parse_format): With caching, copy
414 (save_parsed_format): Use dtp->format directy without
417 2013-03-29 Tobias Burnus <burnus@net-b.de>
420 * io/list_read.c (nml_query): Only abort when
422 (namelist_read): Add goto instead of falling through.
424 2013-03-25 Tilo Schwarz <tilo@tilo-schwarz.de>
427 * io/list_read.c (nml_parse_qualifier): To check for a derived type
428 don't use the namelist head element type but the current element type.
429 (nml_get_obj_data): Add current namelist element type to
430 nml_parse_qualifier call.
432 2013-03-24 Tobias Burnus <burnus@net-b.de>
435 * io/list_read.c (read_real): Fix EOF diagnostic.
437 2013-03-20 Tilo Schwarz <tilo@tilo-schwarz.de>
440 * io/list_read.c (nml_read_obj): Don't end the component loop on a
441 nested derived type, but continue with the next loop iteration.
442 (nml_get_obj_data): Don't move the first_nl pointer further in the
443 list if a qualifier was found.
445 2013-03-20 Tilo Schwarz <tilo@tilo-schwarz.de>
448 * io/open.c (st_open): Raise error for unit number < 0 only if
449 unit number does not exist already.
451 2013-03-19 Janne Blomqvist <jb@gcc.gnu.org>
453 * libgfortran.h: Include stdbool.h.
455 (notify_std): Change return type to bool.
456 * intrinsics/chmod.c: Don't include stdbool.h.
457 * intrinsics/execute_command_line.c: Likewise.
458 * io/format.c: Likewise.
459 * io/list_read.c (nml_parse_qualifier): Change return type to bool.
460 (nml_read_obj): Likewise.
461 (nml_get_obj_data): Likewise.
462 * io/transfer.c (read_block_form): Fix comment.
463 (write_buf): Change return type to bool.
464 * io/write.c: Don't include stdbool.h.
465 * io/write_float.def (output_float): Change return type to bool.
466 (output_float_FMT_G_ ## x): Change type of result variable.
467 * runtime/error.c (notify_std): Change return type to bool.
469 2013-03-11 Tobias Burnus <burnus@net-b.de>
471 * io/transfer.c (read_block_direct): Correct condition.
472 * intrinsics/execute_command_line.c (execute_command_line):
473 Remove dead code for the HAVE_FORK case.
475 2013-02-21 Janne Blomqvist <jb@gcc.gnu.org>
478 * io/open.c (test_endfile): Call stell only if size != 0.
479 * io/unix.c (raw_tell): Revert r194679.
480 (raw_size): Return size field only for regular files, otherwise 0.
482 2013-02-19 John David Anglin <dave.anglin@nrc-cnrc.gc.ca>
485 * acinclude.m4 (LIBGFOR_CHECK_FOR_BROKEN_POWF): Remove check for
487 * configure.ac (LIBGFOR_CHECK_FOR_BROKEN_POWF): Likewise.
488 * intrinsics/c99_functions.c: Likewise.
489 * configure: Rebuilt.
490 * config.h.in: Rebuilt.
492 2013-02-06 Janus Weil <janus@gcc.gnu.org>
495 * runtime/in_pack_generic.c (internal_pack): Return if base_addr is
498 2013-01-23 Janne Blomqvist <jb@gcc.gnu.org>
500 * io/file_pos.c (unformatted_backspace): Use __builtin_bswapXX
501 instead of reverse_memcpy.
502 * io/io.h (reverse_memcpy): Remove prototype.
503 * io/transfer.c (reverse_memcpy): Make static, move towards
505 (bswap_array): New function.
506 (unformatted_read): Use bswap_array to byte swap the data
508 (unformatted_write): Use a larger temp buffer and bswap_array.
509 (us_read): Use __builtin_bswapXX instead of reverse_memcpy.
510 (write_us_marker): Likewise.
512 2013-01-14 Richard Sandiford <rdsandiford@googlemail.com>
514 Update copyright years.
516 2013-01-06 Tobias Burnus <burnus@net-b.de>
519 * intrinsics/env.c (get_environment_variable_i8): Don't use
520 uninitialized variable.
522 2013-01-02 Jerry DeLisle <jvdelisle@gcc.gnu.org>
525 * io/list_read.c (read_real): Do not call hit_eof when EOF can be
526 treated as a value separator.
527 (parse_real): Likewise.
528 (read_logical): Likewise.
529 (read_character): Likewise.
530 (read_complex): Likewise.
532 Copyright (C) 2013-2014 Free Software Foundation, Inc.
534 Copying and distribution of this file, with or without modification,
535 are permitted in any medium without royalty provided the copyright
536 notice and this notice are preserved.