libgfortran/ChangeLog

   1 2014-08-31  Tobias Burnus  <burnus@net-b.de>
   2
   3         * caf/libcaf.h (_gfortran_caf_send, _gfortran_caf_get,
   4         _gfortran_caf_sendget): Update prototype.
   5         * caf/single.c (_gfortran_caf_send, _gfortran_caf_get,
   6         _gfortran_caf_sendget): Handle may_require_tmp.
   7
   8 2014-08-20  Steven G. Kargl  <kargl@gcc.gnu.org>
   9
  10         PR libgfortran/62188
  11         * m4/bessel.m4: Avoid indexing off the end of an array.
  12         * generated/bessel_r10.c: Regenerated.
  13         * generated/bessel_r16.c: Ditto.
  14         * generated/bessel_r4.c: Ditto.
  15         * generated/bessel_r8.c: Ditto.
  16
  17 2014-08-14  Tobias Burnus  <burnus@net-b.de>
  18
  19         * caf/libcaf.h (caf_register_t): Update for critical.
  20         (_gfortran_caf_critical, _gfortran_caf_end_critical): Remove.
  21         (_gfortran_caf_lock, _gfortran_caf_unlock): Add.
  22         * caf/single.c (_gfortran_caf_register): Handle locking
  23         variables.
  24         (_gfortran_caf_sendget): Re-name args for consistency.
  25         (_gfortran_caf_lock, _gfortran_caf_unlock): Add.
  26
  27 2014-08-04  Jakub Jelinek  <jakub@redhat.com>
  28
  29         * runtime/memory.c (xmallocarray): Avoid division for the common case.
  30
  31 2014-07-20  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
  32
  33         PR libgfortran/61632
  34         * io/format.c (format_error): Avoid invalid string pointer by
  35         using the fortran string length values to generate error string.
  36         (parse_format): Allocate the null terminator for the format
  37         string.
  38
  39 2014-07-12  Tobias Burnus  <burnus@net-b.de>
  40
  41         * caf/libcaf.h (_gfortran_caf_atomic_define,
  42         _gfortran_caf_atomic_ref, _gfortran_caf_atomic_op,
  43         _gfortran_caf_atomic_cas): New prototypes.
  44         * caf/single.c (_gfortran_caf_atomic_define,
  45         _gfortran_caf_atomic_ref, _gfortran_caf_atomic_op,
  46         _gfortran_caf_atomic_cas): New functions.
  47
  48 2014-07-10  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  49
  50         * config/fpu-*.h (get_fpu_rounding_mode, set_fpu_rounding_mode,
  51         support_fpu_rounding_mode): Clean up, mark unreachable code as such.
  52
  53 2014-07-09  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  54
  55         * libgfortran.h (support_fpu_underflow_control,
  56         get_fpu_underflow_mode, set_fpu_underflow_mode): New prototypes.
  57         * config/fpu-*.h (support_fpu_underflow_control,
  58         get_fpu_underflow_mode, set_fpu_underflow_mode):
  59         New functions.
  60         * ieee/ieee_arithmetic.F90: Support underflow control.
  61
  62 2014-07-08  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
  63
  64         * config/fpu-sysv.h (get_fpu_rounding_mode): Use FP_RN, FP_RP,
  65         FP_RM, FP_RZ unconditionally.
  66         (set_fpu_rounding_mode): Likewise.
  67
  68 2014-07-07  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  69
  70         * libgfortran.h: Assume __GNUC__.
  71
  72 2014-07-07  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  73
  74         * runtime/stop.c: Use C11 _Noreturn.
  75         * libgfortran.h: Use C11 _Noreturn in prototypes.
  76         Move REALPART, IMAGPART and COMPLEX_ASSIGN macros...
  77         * intrinsics/c99_functions.c: ... here.
  78
  79 2014-07-07  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  80
  81         * config/fpu-387.h, config/fpu-aix.h, config/fpu-sysv.h,
  82         config/fpu-glibc.h: Use static assertions.
  83
  84 2014-07-05  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
  85
  86         * configure, config.h.in: Regenerate.
  87         * config/fpu-sysv.h: Include <assert.h>.
  88
  89 2014-07-02  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  90
  91         * config/fpu-glibc.h: Fix comment about FE_DENORMAL.
  92
  93 2014-07-02  Uros Bizjak  <ubizjak@gmail.com>
  94
  95         * configure.host (ieee_flags): Add -mieee for alpha*.
  96
  97         * config/fpu-glibc.h (support_fpu_rounding_mode): Correctly handle
  98         GFC_FPE_UPWARD, GFC_FPE_DOWNWARD and GFC_FPE_TOWARDZERO.
  99         * config/fpu-aix.h (support_fpu_rounding_mode): Ditto.
 100
 101 2014-06-29  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
 102
 103         * config/fpu-387.h (my_fenv_t): Amend structure so it also works
 104         on mingw32.
 105
 106 2014-06-28  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 107
 108         PR libgfortran/61640
 109         * io/list_read.c (next_char_internal): Adjust the read length to
 110         a single wide character. (eat_spaces): Add missing paren.
 111         * io/unix.c (mem_read4): Use the correct mem_alloc function for
 112         wide character internal reads.
 113
 114 2014-06-28  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
 115
 116         PR fortran/29383
 117         * configure.host: Add checks for IEEE support, rework priorities.
 118         * configure.ac: Define IEEE_SUPPORT, check for fpsetsticky and
 119         fpresetsticky.
 120         * configure: Regenerate.
 121         * Makefile.am: Build new ieee files, install IEEE_* modules.
 122         * Makefile.in: Regenerate.
 123         * gfortran.map (GFORTRAN_1.6): Add new symbols.
 124         * libgfortran.h (get_fpu_trap_exceptions, set_fpu_trap_exceptions,
 125         support_fpu_trap, set_fpu_except_flags, support_fpu_flag,
 126         support_fpu_rounding_mode, get_fpu_state, set_fpu_state): New
 127         prototypes.
 128         * config/fpu-*.h (get_fpu_trap_exceptions,
 129         set_fpu_trap_exceptions, support_fpu_trap, set_fpu_except_flags,
 130         support_fpu_flag, support_fpu_rounding_mode, get_fpu_state,
 131         set_fpu_state): New functions.
 132         * ieee/ieee_features.F90: New file.
 133         * ieee/ieee_exceptions.F90: New file.
 134         * ieee/ieee_arithmetic.F90: New file.
 135         * ieee/ieee_helper.c: New file.
 136
 137 2014-06-26  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 138
 139         PR libgfortran/61499
 140         * io/list_read.c (eat_spaces): Use a 'for' loop instead of
 141         'while' loop to skip the loop if there are no bytes left in the
 142         string. Only seek if actual spaces can be skipped.
 143
 144 2014-06-25  Tobias Burnus  <burnus@net-b.de>
 145
 146         * caf/single.c (assign_char4_from_char1, assign_char1_from_char4,
 147         convert_type): New static functions.
 148         (_gfortran_caf_get, _gfortran_caf_send): Use them.
 149
 150 2014-06-19  Tobias Burnus  <burnus@net-b.de>
 151
 152         * caf/single.c (_gfortran_caf_co_sum, _gfortran_caf_co_max,
 153         _gfortran_caf_co_min): Fix stat setting.
 154
 155 2014-06-17  Tobias Burnus  <burnus@net-b.de>
 156
 157         * caf/libcaf.h (gfc_descriptor_t): New typedef.
 158         (caf_vector_t): Update.
 159         (_gfortran_caf_co_sum, _gfortran_caf_co_max, _gfortran_caf_co_min):
 160         Remove vector-subscript argument.
 161         (_gfortran_caf_co_send, _gfortran_caf_co_get,
 162         _gfortran_caf_co_sendget): New.
 163         * caf/single.c (_gfortran_caf_co_sum, _gfortran_caf_co_max,
 164         _gfortran_caf_co_min): Remove vector-subscript argument.
 165         (_gfortran_caf_co_send, _gfortran_caf_co_get,
 166         _gfortran_caf_co_sendget): New.
 167
 168 2014-06-17  Janne Blomqvist  <jb@gcc.gnu.org>
 169
 170         * libgfortran.h (xmallocarray): New prototype.
 171         * runtime/memory.c (xmallocarray): New function.
 172         (xcalloc): Check for nonzero separately instead of multiplying.
 173         * generated/*.c: Regenerated.
 174         * intrinsics/cshift0.c (cshift0): Call xmallocarray instead of
 175         xmalloc.
 176         * intrinsics/eoshift0.c (eoshift0): Likewise.
 177         * intrinsics/eoshift2.c (eoshift2): Likewise.
 178         * intrinsics/pack_generic.c (pack_internal): Likewise.
 179         (pack_s_internal): Likewise.
 180         * intrinsics/reshape_generic.c (reshape_internal): Likewise.
 181         * intrinsics/spread_generic.c (spread_internal): Likewise.
 182         (spread_internal_scalar): Likewise.
 183         * intrinsics/string_intrinsics_inc.c (string_trim): Likewise.
 184         (string_minmax): Likewise.
 185         * intrinsics/transpose_generic.c (transpose_internal): Likewise.
 186         * intrinsics/unpack_generic.c (unpack_internal): Likewise.
 187         * io/list_read.c (nml_touch_nodes): Don't cast xmalloc return value.
 188         * io/transfer.c (st_set_nml_var): Call xmallocarray instead of
 189         xmalloc.
 190         * io/unit.c (get_internal_unit): Likewise.
 191         (filename_from_unit): Don't cast xmalloc return value.
 192         * io/write.c (nml_write_obj): Likewise, formatting.
 193         * m4/bessel.m4 (bessel_jn_r'rtype_kind`): Call xmallocarray
 194         instead of xmalloc.
 195         (besse_yn_r'rtype_kind`): Likewise.
 196         * m4/cshift1.m4 (cshift1): Likewise.
 197         * m4/eoshift1.m4 (eoshift1): Likewise.
 198         * m4/eoshift3.m4 (eoshift3): Likewise.
 199         * m4/iforeach.m4: Likewise.
 200         * m4/ifunction.m4: Likewise.
 201         * m4/ifunction_logical.m4 (name`'rtype_qual`_'atype_code):
 202         Likewise.
 203         * m4/in_pack.m4 (internal_pack_'rtype_ccode`): Likewise.
 204         * m4/matmul.m4 (matmul_'rtype_code`): Likewise.
 205         * m4/matmull.m4 (matmul_'rtype_code`): Likewise.
 206         * m4/pack.m4 (pack_'rtype_code`): Likewise.
 207         * m4/reshape.m4 (reshape_'rtype_ccode`): Likewise.
 208         * m4/shape.m4 (shape_'rtype_kind`): Likewise.
 209         * m4/spread.m4 (spread_'rtype_code`): Likewise.
 210         (spread_scalar_'rtype_code`): Likewise.
 211         * m4/transpose.m4 (transpose_'rtype_code`): Likewise.
 212         * m4/unpack.m4 (unpack0_'rtype_code`): Likewise.
 213         (unpack1_'rtype_code`): Likewise.
 214         * runtime/convert_char.c (convert_char1_to_char4): Likewise.
 215         (convert_char4_to_char1): Simplify.
 216         * runtime/environ.c (init_unformatted): Call xmallocarray instead
 217         of xmalloc.
 218         * runtime/in_pack_generic.c (internal_pack): Likewise.
 219
 220 2014-06-15  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
 221
 222         PR libfortran/60468
 223         * configure.ac: Include <math.h> when checking for fp_except_t
 224         and fp_rnd_t types.
 225         * configure: Regenerate.
 226
 227 2014-06-08  Janne Blomqvist  <jb@gcc.gnu.org>
 228
 229         PR libfortran/56981
 230         * io/unix.h (struct stream_vtable): Add new member function,
 231         markeor.
 232         (smarkeor): New inline function.
 233         (flush_if_unbuffered): Remove prototype.
 234         * io/unix.c (raw_markeor): New function.
 235         (raw_vtable): Initialize markeor member.
 236         (buf_markeor): New function.
 237         (buf_vtable): Initialize markeor member.
 238         (mem_vtable): Likewise.
 239         (mem4_vtable): Likewise.
 240         (flush_if_unbuffered): Remove function.
 241         * io/transfer.c (next_record): Call smarkeor instead of
 242         flush_if_unbuffered.
 243
 244 2014-05-27  Uros Bizjak  <ubizjak@gmail.com>
 245
 246         * intrinsics/getcwd.c: Include stdlib.h.
 247
 248 2014-05-26  Janne Blomqvist  <jb@gcc.gnu.org>
 249
 250         * libgfortran.h (xrealloc): New prototype.
 251         * runtime/memory.c (xrealloc): New function.
 252         * io/fbuf.c (fbuf_alloc): Use xrealloc.
 253         * io/list_read.c (push_char_default): Likewise.
 254         (push_char4): Likewise.
 255
 256 2014-05-26  Janne Blomqvist  <jb@gcc.gnu.org>
 257
 258         PR libfortran/61310
 259         * intrinsics/ctime.c (strctime): Rename to gf_ctime, use snprintf
 260         instead of strftime.
 261         (fdate): Use gf_ctime.
 262         (fdate_sub): Likewise.
 263         (ctime): Likewise.
 264         (ctime_sub): Likewise.
 265
 266 2014-05-26  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 267
 268         PR libgfortran/55117
 269         * io/list_read.c (extended_look_ahead): New helper function to
 270         scan the namelist name and look for matches with the new '+'
 271         extended type parent indicator.  (str_comp_extended): New
 272         helper function to compare the namelist name with the varname
 273         namelist. (find_nml_name): Use the new helper functions to match
 274         the extended type varnames.
 275
 276 2014-05-23  Jerry DeLisle  <jvdelisle@gcc.gnu>
 277
 278         PR libfortran/61173
 279         * io/list_read.c (eat_spaces): If the next character pointed to
 280         is a space, don't seek, must be at the end.
 281
 282 2014-05-23  Hans-Peter Nilsson  <hp@axis.com>
 283
 284         * configure.ac [with_newlib] (HAVE_STRNLEN, HAVE_STRNDUP): Define.
 285         * configure: Regenerate.
 286
 287 2014-05-23  Janne Blomqvist  <jb@gcc.gnu.org>
 288
 289         PR libfortran/60324
 290         * runtime/string.c: Include stdlib.h.
 291
 292 2014-05-22  Janne Blomqvist  <jb@gcc.gnu.org>
 293
 294         PR libfortran/60324
 295         * config.h.in: Regenerated.
 296         * configure: Regenerated.
 297         * configure.ac (AC_CHECK_FUNCS_ONCE): Check for strnlen and
 298         strndup.
 299         * libgfortran.h (fc_strdup): New prototype.
 300         * runtime/string.c (strnlen): New fallback function.
 301         (strndup): New fallback function.
 302         (fc_strdup): New function.
 303         * io/close.c (st_close): Use fc_strdup.
 304         * io/open.c (new_unit): Likewise.
 305         (already_open): Likewise.
 306         * io/unit.c (filename_from_unit): Likewise.
 307         * io/unix.c (unpack_filename): Remove function.
 308         (regular_file): Rename to regular_file2, add path argument.
 309         (regular_file): New function calling regular_file2.
 310         (compare_file_filename): Use fc_strdup.
 311         (find_file): Likewise.
 312         (delete_file): Likewise.
 313         (file_exists): Likewise.
 314         (file_size): Likewise.
 315         (inquire_sequential): Likewise.
 316         (inquire_direct): Likewise.
 317         (inquire_formatted): Likewise.
 318         (inquire_access): Likewise.
 319         * io/unix.h (unpack_filename): Remove prototype.
 320         * runtime/main.c (please_free_exe_path_when_done): Change type to
 321         bool.
 322         (store_exe_path): Use malloced buffer, grow as needed.
 323
 324 2014-05-17  Jerry DeLisle  <jvdelisle@gcc.gnu>
 325
 326         PR libfortran/52539
 327         * io/io.h (gfc_unit): New function pointers *next_char_fn_ptr
 328         and *push_char_fn_ptr.
 329         *io/list_read.c (next_char): Create macro with this name to call
 330         the new function pointer. Split the original next_char function
 331         into three new functions. (next_char_default, next_char_internal,
 332         next_char_utf8): New functions. (push_char): Create macro with
 333         this name to call new function pointer. Split the original
 334         push_char into three new functions. (push_char_default,
 335         push_char_internal, push_char4): New functions. (set_workers):
 336         New function to initilize the function pointers depending on the
 337         type of IO to be performed. (list_formatted_read_scalar): Use
 338         set_workers function. (finish_list_read): Likewise.
 339         (namelist_read): Likewise.
 340         (nml_get_obj_data): Use push_char_default.
 341
 342 2014-05-16  Janne Blomqvist  <jb@gcc.gnu.org>
 343
 344         PR libfortran/61187
 345         * io/unix.c (raw_close): Check if s->fd is -1.
 346         (fd_to_stream): Check return value of fstat(), handle error.
 347
 348 2014-05-12  Janne Blomqvist  <jb@gcc.gnu.org>
 349
 350         PR libfortran/61035
 351         * intrinsics/getcwd.c (getcwd_i4_sub): Avoid potentially large
 352         stack allocation, avoid extra copying in the common case.
 353
 354 2014-05-12  Janne Blomqvist  <jb@gcc.gnu.org>
 355
 356         * configure.ac (AM_CFLAGS): Use -std=gnu11.
 357         (CFLAGS): Likewise.
 358         * configure: Regenerated.
 359
 360 2014-05-11  Tobias Burnus  <burnus@net-b.de>
 361
 362         * caf/libcaf.h (_gfortran_caf_num_images): Change type of
 363         second argument to int.
 364         * caf/mpi.c (_gfortran_caf_num_images): Ditto.
 365         * caf/single.c (_gfortran_caf_num_images): Ditto.
 366
 367 2014-05-08  Tobias Burnus  <burnus@net-b.de>
 368
 369         * caf/libcaf.h (caf_vector_t, _gfortran_caf_co_sum,
 370         _gfortran_caf_co_min, _gfortran_caf_co_max): Declare
 371         * caf/single.c
 372
 373 2014-05-06  Jerry DeLisle  <jvdelisle@gcc.gnu>
 374
 375         PR libfortran/61049
 376         * io/list_read.c (list_formatted_read_scalar): Use eat_separator
 377         and delete extraneous code.
 378
 379 2014-04-30  Tobias Burnus  <burnus@net-b.de>
 380
 381         * caf/libcaf.h (_gfortran_caf_this_image, _gfortran_caf_num_images):
 382         New prototypes.
 383         (_gfortran_caf_init): Change prototype.
 384         (mpi_token_t): New typedef.
 385         (TOKEN): New define.
 386         * caf/mpi.c (_gfortran_caf_this_image, _gfortran_caf_num_images):
 387         New functions.
 388         (_gfortran_caf_init): Update.
 389         (_gfortran_caf_finalize, _gfortran_caf_register,
 390         _gfortran_caf_deregister): Use mpi_token_t.
 391         * caf/single.c (_gfortran_caf_this_image, _gfortran_caf_num_images):
 392         New functions.
 393         (_gfortran_caf_init): Update.
 394         (_gfortran_caf_finalize, _gfortran_caf_register,
 395         _gfortran_caf_deregister): Use mpi_token_t, simplify.
 396
 397 2014-04-26  Jerry DeLisle  <jvdelisle@gcc.gnu>
 398
 399         PR libfortran/52539
 400         * io/list_read.c: Add uchar typedef. (push_char4): New function
 401         to save kind=4 character. (next_char_utf8): New function to read
 402         a single UTF-8 encoded character value. (read_chracter): Update
 403         to use the new functions for reading UTF-8 strings.
 404         (list_formatted_read_scalar): Update to handle list directed
 405         reads of UTF-8 strings. (nml_read_obj): Likewise update for
 406         UTF-8 strings in namelists.
 407         * io/write.c (nml_write_obj): Add kind=4 character support for
 408         namelist writes.
 409
 410 2014-04-24  Kyrylo Tkachov  <kyrylo.tkachov@arm.com>
 411
 412         * configure.ac: Quote usage of ac_cv_func_clock_gettime in if test.
 413         * configure: Regenerate.
 414
 415 2014-04-22  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
 416
 417         * config/fpu-387.h [__sun__ && __svr4__]: Remove SSE execution
 418         check.
 419
 420 2014-04-11  Jerry DeLisle  <jvdelisle@gcc.gnu>
 421
 422         PR libfortran/60810
 423         io/unit.c (is_trim_ok): If internal unit is array, do not trim.
 424
 425 2014-03-21  Jerry DeLisle  <jvdelisle@gcc.gnu>
 426
 427         PR libfortran/60148
 428         * io/transfer.c (data_transfer_init): If std= was specified, set
 429         delim status to DELIM_NONE of no other was specified.
 430
 431 2014-03-18  Ulrich Weigand  <Ulrich.Weigand@de.ibm.com>
 432
 433         * configure.ac: Check for presence of fcntl.
 434         * configure: Regenerate.
 435         * config.h.in: Regenerate.
 436         * io/unix.c (set_close_on_exec): Check for HAVE_FCNTL.
 437
 438 2014-03-17  Jerry DeLisle  <jvdelisle@gcc.gnu>
 439
 440         PR libfortran/48600
 441         * io/list_read.c (list_formatted_read_scalar): Do not use
 442         eat_separator. Explicitly set the comma and end-of-line flags.
 443         Check for END condition from finish_separator.
 444
 445 2014-03-15  Jerry DeLisle  <jvdelisle@gcc.gnu>
 446
 447         PR libfortran/58324
 448         * io/list_read.c (finish_list_read): Read one character to check
 449         for the end of the file.  If it is the end, then issue the file
 450         end error message.  If not, use eat_line to reach the end
 451         without giving error.  The next attempt to read will then
 452         issue the error as described above.
 453
 454 2014-03-12  Jerry DeLisle  <jvdelisle@gcc.gnu>
 455
 456         PR libfortran/38199
 457         * io/read.c (read_decimal): Quickly skip spaces to avoid calls
 458         to next_char.
 459         * io/unit.c (is_trim_ok): New helper function to check various
 460         conditions to see if its OK to trim the internal unit string.
 461         (get_internal_unit): Use LEN_TRIM to shorten selected internal
 462         unit strings for optimizing READ. Enable this optimization for
 463         formatted READ.
 464         * io/list_read.c (finish_list_read): Don't call eat_line for
 465         internal units.
 466
 467 2014-03-08  Jerry DeLisle  <jvdelisle@gcc.gnu>
 468
 469         PR libfortran/38199
 470         * io/list_read.c (next_char): Mark unlikely error checks.
 471         (eat_spaces): For character array reading, skip ahead over
 472         spaces rather than call next_char multiple times.
 473
 474 2014-03-08  Tobias Burnus  <burnus@net-b.de>
 475
 476         * libgfortran.h (unlikely, likely): Add usage comment.
 477
 478 2014-03-08  Dominique d'Humieres  <dominiq@lps.ens.fr>
 479
 480         PR libgfortran/60128
 481         * io/write_float.def (output_float): Remove unused variable
 482         nzero_real. Replace a double space with a single one.
 483         (determine_en_precision): Fix wrong handling of the EN format.
 484
 485 2014-03-03  Jerry DeLisle  <jvdelisle@gcc.gnu>
 486
 487         PR libfortran/60148
 488         * io/inquire.c (inquire_via_unit): In the case of
 489         DELIM_UNSPECIFIED set inquire return string to "NONE".
 490         * io/list_read.c (read_character): In the case of DELIM_NONE and
 491         namelists, complete the character read using the namelist
 492         variable length.
 493         * io/open.c (new_unit): Don't set delim status to none if not
 494         specified so that DELIM_UNSPECIFIED can be used later.
 495         * io/transfer.c (data_transfer_init): For namelist I/O, if the
 496         unit delim status is unspecified set the current status to quote.
 497         Otherwise, set current status to the unit status.
 498         * io/unit.c (get_internel_unit, init_unit): Remember to set
 499         flags_delim initially to DELIM_UNSPECIFIED so defaults come out
 500         correctly.
 501         * io/write.c (write_character): Add a new function argument
 502         "mode" to signify that raw output is to be used vs output with
 503         delimiters. If the mode is set to DELIM (1) proceed with
 504         delimiters. (list_formatted_write_scalar): Write the separator
 505         only if a delimiter was previously specified. Update the call to
 506         write_character with the mode argument given.
 507         (namelist_write_newline): Use the mode argument. (nml_write_obj):
 508         Use the mode argument. Remove use of tmp_delim. Write the
 509         semi-colon or comma correctly only when needed with using
 510         delimiters. Cleanup whitespace.
 511         (namelist_write): If delim is not specified in namelist I/O,
 512         default to using quotes. Get rid of the tmp_delim variable and
 513         use the new mode argument in write_character.
 514
 515 2014-02-21  Tobias Burnus  <burnus@net-b.de>
 516
 517         PR fortran/60286
 518         * libgfortran/io/inquire.c (yes, no): New static const char vars.
 519         (inquire_via_unit): Use them. Use OPEN mode instead of using
 520         POSIX's access to query about write=, read= and readwrite=.
 521
 522 2014-01-20  Jerry DeLisle  <jvdelisle@gcc.gnu>
 523             Dominique d'Humieres  <dominiq@lps.ens.fr>
 524
 525         * io/write_float.def (output_float): Remove inadvertent test
 526         code from previous patch.
 527
 528 2014-01-19  Jerry DeLisle  <jvdelisle@gcc.gnu>
 529             Dominique d'Humieres  <dominiq@lps.ens.fr>
 530
 531         PR libfortran/59771
 532         PR libfortran/59774
 533         PR libfortran/59836
 534         * io/write_float.def (output_float): Fix wrong handling of the
 535         Fw.0 format.
 536         (output_float_FMT_G_): Fixes rounding issues with -m32.
 537
 538 2014-01-11  Jerry DeLisle  <jvdelisle@gcc.gnu>
 539             Dominique d'Humieres  <dominiq@lps.ens.fr>
 540             Steven G. Kargl  <kargl@gcc.gnu.org>
 541
 542         PR libfortran/59700
 543         PR libfortran/59764
 544         * io/io.h (struct st_parameter_dt): Assign expanded_read flag to
 545         unused bit. Define new variable line_buffer_pos.
 546         * io/list_read.c (free_saved, next_char, l_push_char,
 547         read_logical, read_real): Replace use of item_count with
 548         line_buffer_pos for line_buffer look ahead.
 549         (read_logical, read_integer, parse_real, read_real, check_type):
 550         Adjust location of free_line to after generating error messages
 551         to retain the correct item count for the message.
 552
 553 2014-01-02  Richard Sandiford  <rdsandiford@googlemail.com>
 554
 555         Update copyright years
 556 ^L
 557 Copyright (C) 2013-2014 Free Software Foundation, Inc.
 558
 559 Copying and distribution of this file, with or without modification,
 560 are permitted in any medium without royalty provided the copyright
 561 notice and this notice are preserved.