libgfortran/ChangeLog

   1 2009-11-19  Janne Blomqvist  <jb@gcc.gnu.org>
   2
   3         * io/fbuf.h: Move includes after include guard.
   4         * io/format.h: Likewise.
   5         * io/unix.h: Likewise.
   6
   7 2009-11-18  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
   8
   9         PR libgfortran/42090
  10         * io/transfer.c (skip_record): Set bytes_left_subrecord to zero after
  11         skipping the remaining bytes in the record.
  12         (next_record_r): Call skip_record with the number of bytes_left to be
  13         skipped.
  14
  15 2009-11-02  Janne Blomqvist  <jb@gcc.gnu.org>
  16
  17         * Makefile.am (gfor_io_headers): Add fbuf.h, format.h, unix.h.
  18         * Makefile.in: Regenerated.
  19         * io/fbuf.h: New file.
  20         * io/format.h: New file.
  21         * io/unix.h: New file.
  22         * io/io.h (struct stream): Move to unix.h, add forward declaration.
  23         (sread): Likewise.
  24         (swrite): Likewise.
  25         (sseek): Likewise.
  26         (stell): Likewise.
  27         (struncate): Likewise.
  28         (sflush): Likewise.
  29         (sflush): Likewise.
  30         (sclose): Likewise.
  31         (compared_files): Move prototype to unix.h.
  32         (open_external): Likewise.
  33         (open_internal): Likewise.
  34         (mem_alloc_w): Likewise.
  35         (mem_alloc_r): Likewise.
  36         (input_stream): Likewise.
  37         (output_stream): Likewise.
  38         (error_stream): Likewise.
  39         (compare_file_filename): Likewise.
  40         (find_file): Likewise.
  41         (delete_file): Likewise.
  42         (file_exists): Likewise.
  43         (inquire_sequential): Likewise.
  44         (inquire_direct): Likewise.
  45         (inquire_formatted): Likewise.
  46         (inquire_unformatted): Likewise.
  47         (inquire_read): Likewise.
  48         (inquire_write): Likewise.
  49         (inquire_readwrite): Likewise.
  50         (file_length): Likewise.
  51         (is_seekable): Likewise.
  52         (is_special): Likewise.
  53         (flush_if_preconnected): Likewise.
  54         (empty_internal_buffer): Likewise.
  55         (stream_isatty): Likewise.
  56         (stream_ttyname): Likewise.
  57         (unpack_filename): Likewise.
  58         (struct fbuf): Move to fbuf.h, add forward declaration.
  59         (fbuf_init): Move prototype to fbuf.h.
  60         (fbuf_destroy): Likewise.
  61         (fbuf_reset): Likewise.
  62         (fbuf_alloc): Likewise.
  63         (fbuf_flush): Likewise.
  64         (fbuf_seek): Likewise.
  65         (fbuf_read): Likewise.
  66         (fbuf_getc_refill): Likewise.
  67         (fbuf_getc): Move inline function to fbuf.h.
  68         (enum format_token): Move to format.h.
  69         (struct fnode): Move to format.h, add forward declaration.
  70         (parse_format): Move prototype to format.h.
  71         (next_format): Likewise.
  72         (unget_format): Likewise.
  73         (format_error): Likewise.
  74         (free_format_data): Likewise.
  75         (free_format_hash_table): Likewise.
  76         (init_format_hash): Likewise.
  77         (free_format_hash): Likewise.
  78         * io/close.c: Include unix.h.
  79         * io/fbuf.c: Include fbuf.h and unix.h.
  80         * io/file_pos.c: Include fbuf.h and unix.h.
  81         * io/format.c: Include format.h.
  82         * io/inquire.c: Include unix.h.
  83         * io/intrinsics.c: Include fbuf.h and unix.h.
  84         * io/list_read.c: Include fbuf.h and unix.h.
  85         * io/open.c: Include fbuf.h and unix.h.
  86         * io/read.c: Include format.h.
  87         * io/transfer.c: Include fbuf.h, format.h, and unix.h.
  88         * io/unit.c: Likewise.
  89         * io/unix.c: Include unix.h.
  90         * io/write.c: Include format.h and unix.h.
  91
  92 2009-10-31  Janne Blomqvist  <jb@gcc.gnu.org>
  93
  94         PR libfortran/41219
  95         * intrinsics/unpack_generic.c (unpack_internal): Remove unused
  96         argument from prototype.
  97         (unpack1): Update unpack_internal call.
  98         (unpack1_char): Likewise.
  99         (unpack1_char4): Likewise.
 100         (unpack0): Likewise.
 101         (unpack0_char): Likewise.
 102         (unpack0_char4): Likewise.
 103         * intrinsics/iso_c_binding.c (c_f_pointer_u0): Get rid of
 104         uninitialized variable warning.
 105
 106 2009-10-29  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 107
 108         PR libgfortran/41711
 109         * libgfortran.h: Define larger sizes for BOZ conversion buffers.
 110         * io/write.c (extract_uint): Include case where size is 10 if integer
 111         is large enough. (write_int): Rename to write_boz. (write_boz): Factor
 112         out extract_uint and delete the conversion function.
 113         (btoa_big): New binary conversion function.
 114         (otoa_big): New octal conversion function.
 115         (ztoa_big): New hexidecimal conversion function.
 116         (write_b): Modify to use new function.
 117         (write_o): Likewise.
 118         (write_z): Likewise.
 119
 120 2009-10-12  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 121
 122         PR libgfortran/41683
 123         * io/format.c (parse_format_list): Allow a repeat specifier immediately
 124         after a P specifier.
 125
 126 2009-10-11  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 127
 128         PR libgfortran/38439
 129         * io/format.c (parse_format_list): Correct logic for FMT_F reading vs
 130         writing. Code clean-up.
 131
 132 2009-10-11  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 133
 134         PR libgfortran/38439
 135         * io/format.c (parse_format_list): Add check for tokens not allowed
 136         after P specifier. Fix comments.  Remove un-needed code. Fix the
 137         default exponent list. Correct pointer assignment error.
 138
 139 2009-10-05  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 140
 141         PR libgfortran/35862
 142         * write_float.def (outout_float): Fix handling of special case where no
 143         digits after the decimal point and values less than 1.0. Adjust index
 144         into digits string. (WRITE_FLOAT): Remove special case code from macro.
 145
 146 2009-09-28  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 147
 148         PR libgfortran/35862
 149         * io.h (gfc_unit): Add round_status.
 150         (format_token): Add enumerators for rounding format specifiers.
 151         * transfer.c (round_opt): New options table.
 152         (formatted_transfer_scalar_read): Add set round_status for each rounding
 153         format token. (formatted_transfer_scalar_write): Likewise.
 154         * format.c (format_lex): Tokenize the rounding format specifiers.
 155         (parse_format_list): Parse the rounding format specifiers.
 156         * write_float.def (outout_float): Modify rounding code to use new
 157         variable rchar to set the appropriate rounding. Fix some whitespace.
 158         * unit.c (get_internal_unit): Initialize rounding mode for internal
 159         units. (init_units): Likewise.
 160
 161 2009-09-19  Iain Sandoe  <iain.sandoe@sandoe-acoustics.co.uk>
 162
 163         * configure.ac: Check for GFORTRAN_C99_1.1 funcs in OS libm.
 164         * configure: Regenerate.
 165         * config.h.in: Ditto.
 166
 167 2009-09-18  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 168
 169         PR libgfortran/41328
 170         * io/transfer.c (read_sf): Set at_eof flag on short read if any
 171         characters were successfully read so that EOF condition with no EOR
 172         marker succeeds.
 173
 174 2009-09-12  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 175
 176         PR libgfortran/41328
 177         * io/transfer.c (read_sf): Adjust fbuf position and do proper
 178         fbuf reads to traverse CR, CR-LF, and LF style line ends.
 179
 180 2009-09-12  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 181
 182         PR libgfortran/41219
 183         * io/write.c (write_a_char4): Use correct type for crlf constant.
 184
 185 2009-09-11  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
 186
 187         * Makefile.am (libgfortranbegin_la_LINK): New.
 188         * Makefile.in: Regenerate.
 189
 190 2009-09-09  Paolo Bonzini  <bonzini@gnu.org>
 191
 192         * configure: Regenerate.
 193
 194 2009-09-08  Paolo Bonzini  <bonzini@gnu.org>
 195
 196         * configure: Regenerate.
 197
 198 2009-09-07  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 199
 200         PR libgfortran/41192
 201         * io/list_read.c (eat_line): Enable eat_line to function on
 202         internal units.
 203
 204         PR libgfortran/41219
 205         * io/list_read.c (nml_read_obj): Replace GFC_DTYPE_UNKNOWN with
 206         BT_NULL to get rid of warning.
 207
 208 2009-09-04  Tobias Burnus  <burnus@net-b.de>
 209
 210         PR fortran/41219
 211         * intrinsics/getlog.c: Define _POSIX for MINGW32.
 212
 213 2009-09-03  Tobias Burnus  <burnus@net-b.de>
 214
 215         PR fortran/41219
 216         * intrinsics/iso_c_binding.c (c_f_pointer_u0): Move variable
 217         declaration out of the loop.
 218
 219 2009-08-30  Thomas Koenig  <tkoenig@gcc.gnu.org>
 220
 221         * m4/pack.m4 (pack_'rtype_code`): Use count_0 for counting true
 222         values in a logical array.  Mark bounds checking tests as
 223         unlikely.
 224         * intrinsics/pack_generic.c (pack_internal): Likewise.
 225         * runtime/bounds.c (count_0):  Fix off-by-one error in detecting
 226         empty arrays.
 227         * generated/pack_c4.c: Regenerated.
 228         * generated/pack_c8.c: Regenerated.
 229         * generated/pack_c10.c: Regenerated.
 230         * generated/pack_c16.c: Regenerated.
 231         * generated/pack_i1.c: Regenerated.
 232         * generated/pack_i16.c: Regenerated.
 233         * generated/pack_i2.c: Regenerated.
 234         * generated/pack_i4.c: Regenerated.
 235         * generated/pack_i8.c: Regenerated.
 236         * generated/pack_r4.c: Regenerated.
 237         * generated/pack_r8.c: Regenerated.
 238         * generated/pack_r10.c: Regenerated.
 239         * generated/pack_r16.c: Regenerated.
 240
 241 2009-08-25  Thomas Koenig  <tkoenig@gcc.gnu.org>
 242
 243         PR libfortran/34670
 244         * runtime/bounds.c (count_0):  New function.
 245         * intrinsics/unpack_generic (unpack_bounds):  New function.
 246         (unpack_internal):  Remove zero stride checks.
 247         (unpack1):  Use unpack_bounds.
 248         (unpack1_char):  Likeweise.
 249         (unpack1_char4):  Likewise
 250         (unpack0):  Likewise.
 251         (unpack0_char):  Likewise.
 252         (unpack0_char4):  Likewise.
 253
 254 2009-08-24  Steven G. Kargl  <kargl@gcc.gnu.org>
 255
 256         PR fortran/41157
 257         * dtime.c (dtime_sub): Fix computing time increment.
 258         * time_1.h: Add <sys/types.h> header.  Use RUSAGE_SELF macro instead
 259         of a hardcoded 0.
 260
 261 2009-08-24  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
 262
 263         * configure.ac (AC_PREREQ): Bump to 2.64.
 264
 265 2009-08-23  Steven G. Kargl  <kargl@gcc.gnu.org>
 266
 267         * intrinsics/cshift0.c: Update license to GPL3+exception.
 268         * runtime/fpu.c: Add a GPL3+exception statement.
 269
 270 2009-08-22  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
 271
 272         * Makefile.am (install-html, install-pdf): Remove.
 273         * Makefile.in: Regenerate.
 274
 275         * Makefile.in: Regenerate.
 276         * aclocal.m4: Regenerate.
 277         * config.h.in: Regenerate.
 278         * configure: Regenerate.
 279
 280 2009-08-22  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
 281
 282         * Makefile.am (libgfortran_la_LINK): Add $(libgfortran_la_LDFLAGS).
 283         * Makefile.in: Regenerate.
 284
 285 2009-08-20  Thomas Koenig  <tkoenig@gcc.gnu.org>
 286
 287         PR libfortran/40962
 288         * iso_c_binding.c (c_f_pointer_u0):  Multiply stride by
 289         previous stride.
 290
 291 2009-08-20  Dave Korn  <dave.korn.cygwin@gmail.com>
 292
 293         * Makefile.am (LTLDFLAGS): Add -bindir flag.
 294         * Makefile.in: Regenerate.
 295
 296 2009-08-17  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 297
 298         PR fortran/41075
 299         * io/io.h (enum format_token): Add FMT_STAR.
 300         * io/format.c (format_lex): Add case for FMT_STAR.
 301         (parse_format_list): Parse FMT_STAR and check for left paren
 302         after. (next_format0): Modify helper function to check for
 303         unimited format and return the repeated format node.  Update
 304         comments to clarify.
 305
 306 2009-08-15  Kai Tietz  <kai.tietz@onevision.com>
 307
 308         * intrinsics/string_intrinsics_inc.c (string_len_trim): Use
 309         __INTPTR_TYPE__ to cast from pointer to scalar integer, if
 310         __INTPTR_TYPE is defined.
 311
 312 2009-08-14  Janne Blomqvist  <jb@gcc.gnu.org>
 313
 314         * fmain.c: Add comment saying file is deprecated.
 315
 316 2009-08-14  Janne Blomqvist  <jb@gcc.gnu.org>
 317
 318         PR libfortran/40863
 319         * gfortran.map: Move new symbols to GFORTRAN_C99_1.1 version node.
 320
 321 2009-08-09 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
 322
 323         PR libfortran/40549
 324         * Makefile.in (LTLDFLAGS): Add -no-undefined.
 325         * Makefile.am: Regenerate.
 326         * libgfortran.h: Remove unused block of code.
 327
 328 2009-08-02  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 329
 330         PR libfortran/40853
 331         * io/list_read.c (nml_get_obj_data): Do not set nl
 332         pointer to first_nl if nl->next is NULL.
 333
 334 2009-07-31  Kaz Kojima  <kkojima@gcc.gnu.org>
 335
 336         * Makefile.am: Don't set SECTION_FLAGS with @SECTION_FLAGS@.
 337         Don't set IEEE_FLAGS with @IEEE_FLAGS@.
 338         * Makefile.in: Regenerate.
 339
 340 2009-07-30  Kaz Kojima  <kkojima@gcc.gnu.org>
 341
 342         * configure.host: Define ieee_flags and set it to -mieee for sh.
 343         * configure.ac: Set IEEE_FLAGS with ieee_flags.
 344         * Makefile.am: Add IEEE_FLAGS to AM_CFLAGS.
 345         * configure: Regenerate.
 346         * Makefile.in: Regenerate.
 347
 348 2009-07-30  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
 349
 350         * configure.ac (_AC_ARG_VAR_PRECIOUS): Use m4_rename_force.
 351
 352 2009-07-27  Tobias Burnus  <burnus@net-b.de>
 353
 354         PR fortran/40863
 355         * c99_functions.c: Define complex I, if not defined.
 356         Create prototypes for C99 functions to silence warnings.
 357         * gfortran.map: Add missing functions to GFORTRAN_C99_1.0
 358         and new GFORTRAN_C99_1.1.
 359
 360 2009-07-25  Tobias Burnus  <burnus@net-b.de>
 361
 362         PR fortran/33197
 363         * intrinsics/c99_functions.c (cacosf,cacos,cacosl,casinf,
 364         casin,casind,catanf,catan,catanl,cacoshf,cacosh,cacoshl,
 365         casinhf,casinh,casinhf,catanhf,catanh,catanhl): New functions.
 366         * c99_protos.h: Add prototypes for those.
 367
 368 2009-07-24  Jakub Jelinek  <jakub@redhat.com>
 369
 370         PR fortran/40643
 371         PR fortran/31067
 372         * libgfortran.h (GFC_REAL_4_INFINITY, GFC_REAL_8_INFINITY,
 373         GFC_REAL_10_INFINITY, GFC_REAL_16_INFINITY, GFC_REAL_4_QUIET_NAN,
 374         GFC_REAL_8_QUIET_NAN, GFC_REAL_10_QUIET_NAN, GFC_REAL_16_QUIET_NAN):
 375         Define.
 376         * m4/iparm.m4 (atype_inf, atype_nan): Define.
 377         * m4/ifunction.m4: Formatting.
 378         * m4/iforeach.m4: Likewise.
 379         (START_FOREACH_FUNCTION): Initialize dest to all 1s, not all 0s.
 380         (START_FOREACH_BLOCK, FINISH_FOREACH_FUNCTION,
 381         FINISH_MASKED_FOREACH_FUNCTION): Run foreach block inside a loop
 382         until count[0] == extent[0].
 383         * m4/minval.m4: Formatting.  Handle NaNs and infinities.  Optimize.
 384         * m4/maxval.m4: Likewise.
 385         * m4/minloc0.m4: Likewise.
 386         * m4/maxloc0.m4: Likewise.
 387         * m4/minloc1.m4: Likewise.
 388         * m4/maxloc1.m4: Likewise.
 389         * generated/maxloc0_16_i16.c: Regenerated.
 390         * generated/maxloc0_16_i1.c: Likewise.
 391         * generated/maxloc0_16_i2.c: Likewise.
 392         * generated/maxloc0_16_i4.c: Likewise.
 393         * generated/maxloc0_16_i8.c: Likewise.
 394         * generated/maxloc0_16_r10.c: Likewise.
 395         * generated/maxloc0_16_r16.c: Likewise.
 396         * generated/maxloc0_16_r4.c: Likewise.
 397         * generated/maxloc0_16_r8.c: Likewise.
 398         * generated/maxloc0_4_i16.c: Likewise.
 399         * generated/maxloc0_4_i1.c: Likewise.
 400         * generated/maxloc0_4_i2.c: Likewise.
 401         * generated/maxloc0_4_i4.c: Likewise.
 402         * generated/maxloc0_4_i8.c: Likewise.
 403         * generated/maxloc0_4_r10.c: Likewise.
 404         * generated/maxloc0_4_r16.c: Likewise.
 405         * generated/maxloc0_4_r4.c: Likewise.
 406         * generated/maxloc0_4_r8.c: Likewise.
 407         * generated/maxloc0_8_i16.c: Likewise.
 408         * generated/maxloc0_8_i1.c: Likewise.
 409         * generated/maxloc0_8_i2.c: Likewise.
 410         * generated/maxloc0_8_i4.c: Likewise.
 411         * generated/maxloc0_8_i8.c: Likewise.
 412         * generated/maxloc0_8_r10.c: Likewise.
 413         * generated/maxloc0_8_r16.c: Likewise.
 414         * generated/maxloc0_8_r4.c: Likewise.
 415         * generated/maxloc0_8_r8.c: Likewise.
 416         * generated/maxloc1_16_i16.c: Likewise.
 417         * generated/maxloc1_16_i1.c: Likewise.
 418         * generated/maxloc1_16_i2.c: Likewise.
 419         * generated/maxloc1_16_i4.c: Likewise.
 420         * generated/maxloc1_16_i8.c: Likewise.
 421         * generated/maxloc1_16_r10.c: Likewise.
 422         * generated/maxloc1_16_r16.c: Likewise.
 423         * generated/maxloc1_16_r4.c: Likewise.
 424         * generated/maxloc1_16_r8.c: Likewise.
 425         * generated/maxloc1_4_i16.c: Likewise.
 426         * generated/maxloc1_4_i1.c: Likewise.
 427         * generated/maxloc1_4_i2.c: Likewise.
 428         * generated/maxloc1_4_i4.c: Likewise.
 429         * generated/maxloc1_4_i8.c: Likewise.
 430         * generated/maxloc1_4_r10.c: Likewise.
 431         * generated/maxloc1_4_r16.c: Likewise.
 432         * generated/maxloc1_4_r4.c: Likewise.
 433         * generated/maxloc1_4_r8.c: Likewise.
 434         * generated/maxloc1_8_i16.c: Likewise.
 435         * generated/maxloc1_8_i1.c: Likewise.
 436         * generated/maxloc1_8_i2.c: Likewise.
 437         * generated/maxloc1_8_i4.c: Likewise.
 438         * generated/maxloc1_8_i8.c: Likewise.
 439         * generated/maxloc1_8_r10.c: Likewise.
 440         * generated/maxloc1_8_r16.c: Likewise.
 441         * generated/maxloc1_8_r4.c: Likewise.
 442         * generated/maxloc1_8_r8.c: Likewise.
 443         * generated/maxval_i16.c: Likewise.
 444         * generated/maxval_i1.c: Likewise.
 445         * generated/maxval_i2.c: Likewise.
 446         * generated/maxval_i4.c: Likewise.
 447         * generated/maxval_i8.c: Likewise.
 448         * generated/maxval_r10.c: Likewise.
 449         * generated/maxval_r16.c: Likewise.
 450         * generated/maxval_r4.c: Likewise.
 451         * generated/maxval_r8.c: Likewise.
 452         * generated/minloc0_16_i16.c: Likewise.
 453         * generated/minloc0_16_i1.c: Likewise.
 454         * generated/minloc0_16_i2.c: Likewise.
 455         * generated/minloc0_16_i4.c: Likewise.
 456         * generated/minloc0_16_i8.c: Likewise.
 457         * generated/minloc0_16_r10.c: Likewise.
 458         * generated/minloc0_16_r16.c: Likewise.
 459         * generated/minloc0_16_r4.c: Likewise.
 460         * generated/minloc0_16_r8.c: Likewise.
 461         * generated/minloc0_4_i16.c: Likewise.
 462         * generated/minloc0_4_i1.c: Likewise.
 463         * generated/minloc0_4_i2.c: Likewise.
 464         * generated/minloc0_4_i4.c: Likewise.
 465         * generated/minloc0_4_i8.c: Likewise.
 466         * generated/minloc0_4_r10.c: Likewise.
 467         * generated/minloc0_4_r16.c: Likewise.
 468         * generated/minloc0_4_r4.c: Likewise.
 469         * generated/minloc0_4_r8.c: Likewise.
 470         * generated/minloc0_8_i16.c: Likewise.
 471         * generated/minloc0_8_i1.c: Likewise.
 472         * generated/minloc0_8_i2.c: Likewise.
 473         * generated/minloc0_8_i4.c: Likewise.
 474         * generated/minloc0_8_i8.c: Likewise.
 475         * generated/minloc0_8_r10.c: Likewise.
 476         * generated/minloc0_8_r16.c: Likewise.
 477         * generated/minloc0_8_r4.c: Likewise.
 478         * generated/minloc0_8_r8.c: Likewise.
 479         * generated/minloc1_16_i16.c: Likewise.
 480         * generated/minloc1_16_i1.c: Likewise.
 481         * generated/minloc1_16_i2.c: Likewise.
 482         * generated/minloc1_16_i4.c: Likewise.
 483         * generated/minloc1_16_i8.c: Likewise.
 484         * generated/minloc1_16_r10.c: Likewise.
 485         * generated/minloc1_16_r16.c: Likewise.
 486         * generated/minloc1_16_r4.c: Likewise.
 487         * generated/minloc1_16_r8.c: Likewise.
 488         * generated/minloc1_4_i16.c: Likewise.
 489         * generated/minloc1_4_i1.c: Likewise.
 490         * generated/minloc1_4_i2.c: Likewise.
 491         * generated/minloc1_4_i4.c: Likewise.
 492         * generated/minloc1_4_i8.c: Likewise.
 493         * generated/minloc1_4_r10.c: Likewise.
 494         * generated/minloc1_4_r16.c: Likewise.
 495         * generated/minloc1_4_r4.c: Likewise.
 496         * generated/minloc1_4_r8.c: Likewise.
 497         * generated/minloc1_8_i16.c: Likewise.
 498         * generated/minloc1_8_i1.c: Likewise.
 499         * generated/minloc1_8_i2.c: Likewise.
 500         * generated/minloc1_8_i4.c: Likewise.
 501         * generated/minloc1_8_i8.c: Likewise.
 502         * generated/minloc1_8_r10.c: Likewise.
 503         * generated/minloc1_8_r16.c: Likewise.
 504         * generated/minloc1_8_r4.c: Likewise.
 505         * generated/minloc1_8_r8.c: Likewise.
 506         * generated/minval_i16.c: Likewise.
 507         * generated/minval_i1.c: Likewise.
 508         * generated/minval_i2.c: Likewise.
 509         * generated/minval_i4.c: Likewise.
 510         * generated/minval_i8.c: Likewise.
 511         * generated/minval_r10.c: Likewise.
 512         * generated/minval_r16.c: Likewise.
 513         * generated/minval_r4.c: Likewise.
 514         * generated/minval_r8.c: Likewise.
 515         * generated/product_c10.c: Likewise.
 516         * generated/product_c16.c: Likewise.
 517         * generated/product_c4.c: Likewise.
 518         * generated/product_c8.c: Likewise.
 519         * generated/product_i16.c: Likewise.
 520         * generated/product_i1.c: Likewise.
 521         * generated/product_i2.c: Likewise.
 522         * generated/product_i4.c: Likewise.
 523         * generated/product_i8.c: Likewise.
 524         * generated/product_r10.c: Likewise.
 525         * generated/product_r16.c: Likewise.
 526         * generated/product_r4.c: Likewise.
 527         * generated/product_r8.c: Likewise.
 528         * generated/sum_c10.c: Likewise.
 529         * generated/sum_c16.c: Likewise.
 530         * generated/sum_c4.c: Likewise.
 531         * generated/sum_c8.c: Likewise.
 532         * generated/sum_i16.c: Likewise.
 533         * generated/sum_i1.c: Likewise.
 534         * generated/sum_i2.c: Likewise.
 535         * generated/sum_i4.c: Likewise.
 536         * generated/sum_i8.c: Likewise.
 537         * generated/sum_r10.c: Likewise.
 538         * generated/sum_r16.c: Likewise.
 539         * generated/sum_r4.c: Likewise.
 540         * generated/sum_r8.c: Likewise.
 541
 542 2009-07-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 543
 544         PR libfortran/32784
 545         * unix.c (regular_file): Check for CONIN$ CONOUT$, and CONERR$ and open
 546         the respective /dev/conin or /dev/conout devices.  This is Cygwin
 547         specific.
 548
 549 2009-07-19  Thomas Koenig  <tkoenig@gcc.gnu.org>
 550
 551         PR libfortran/34670
 552         PR libfortran/36874
 553         * Makefile.am:  Add bounds.c
 554         * libgfortran.h (bounds_equal_extents):  Add prototype.
 555         (bounds_iforeach_return):  Likewise.
 556         (bounds_ifunction_return):  Likewise.
 557         (bounds_reduced_extents):  Likewise.
 558         * runtime/bounds.c:  New file.
 559         (bounds_iforeach_return):  New function; correct typo in
 560         error message.
 561         (bounds_ifunction_return):  New function.
 562         (bounds_equal_extents):  New function.
 563         (bounds_reduced_extents):  Likewise.
 564         * intrinsics/cshift0.c (cshift0):  Use new functions
 565         for bounds checking.
 566         * intrinsics/eoshift0.c (eoshift0):  Likewise.
 567         * intrinsics/eoshift2.c (eoshift2):  Likewise.
 568         * m4/iforeach.m4:  Likewise.
 569         * m4/eoshift1.m4:  Likewise.
 570         * m4/eoshift3.m4:  Likewise.
 571         * m4/cshift1.m4:  Likewise.
 572         * m4/ifunction.m4:  Likewise.
 573         * Makefile.in:  Regenerated.
 574         * generated/cshift1_16.c: Regenerated.
 575         * generated/cshift1_4.c: Regenerated.
 576         * generated/cshift1_8.c: Regenerated.
 577         * generated/eoshift1_16.c: Regenerated.
 578         * generated/eoshift1_4.c: Regenerated.
 579         * generated/eoshift1_8.c: Regenerated.
 580         * generated/eoshift3_16.c: Regenerated.
 581         * generated/eoshift3_4.c: Regenerated.
 582         * generated/eoshift3_8.c: Regenerated.
 583         * generated/maxloc0_16_i1.c: Regenerated.
 584         * generated/maxloc0_16_i16.c: Regenerated.
 585         * generated/maxloc0_16_i2.c: Regenerated.
 586         * generated/maxloc0_16_i4.c: Regenerated.
 587         * generated/maxloc0_16_i8.c: Regenerated.
 588         * generated/maxloc0_16_r10.c: Regenerated.
 589         * generated/maxloc0_16_r16.c: Regenerated.
 590         * generated/maxloc0_16_r4.c: Regenerated.
 591         * generated/maxloc0_16_r8.c: Regenerated.
 592         * generated/maxloc0_4_i1.c: Regenerated.
 593         * generated/maxloc0_4_i16.c: Regenerated.
 594         * generated/maxloc0_4_i2.c: Regenerated.
 595         * generated/maxloc0_4_i4.c: Regenerated.
 596         * generated/maxloc0_4_i8.c: Regenerated.
 597         * generated/maxloc0_4_r10.c: Regenerated.
 598         * generated/maxloc0_4_r16.c: Regenerated.
 599         * generated/maxloc0_4_r4.c: Regenerated.
 600         * generated/maxloc0_4_r8.c: Regenerated.
 601         * generated/maxloc0_8_i1.c: Regenerated.
 602         * generated/maxloc0_8_i16.c: Regenerated.
 603         * generated/maxloc0_8_i2.c: Regenerated.
 604         * generated/maxloc0_8_i4.c: Regenerated.
 605         * generated/maxloc0_8_i8.c: Regenerated.
 606         * generated/maxloc0_8_r10.c: Regenerated.
 607         * generated/maxloc0_8_r16.c: Regenerated.
 608         * generated/maxloc0_8_r4.c: Regenerated.
 609         * generated/maxloc0_8_r8.c: Regenerated.
 610         * generated/maxloc1_16_i1.c: Regenerated.
 611         * generated/maxloc1_16_i16.c: Regenerated.
 612         * generated/maxloc1_16_i2.c: Regenerated.
 613         * generated/maxloc1_16_i4.c: Regenerated.
 614         * generated/maxloc1_16_i8.c: Regenerated.
 615         * generated/maxloc1_16_r10.c: Regenerated.
 616         * generated/maxloc1_16_r16.c: Regenerated.
 617         * generated/maxloc1_16_r4.c: Regenerated.
 618         * generated/maxloc1_16_r8.c: Regenerated.
 619         * generated/maxloc1_4_i1.c: Regenerated.
 620         * generated/maxloc1_4_i16.c: Regenerated.
 621         * generated/maxloc1_4_i2.c: Regenerated.
 622         * generated/maxloc1_4_i4.c: Regenerated.
 623         * generated/maxloc1_4_i8.c: Regenerated.
 624         * generated/maxloc1_4_r10.c: Regenerated.
 625         * generated/maxloc1_4_r16.c: Regenerated.
 626         * generated/maxloc1_4_r4.c: Regenerated.
 627         * generated/maxloc1_4_r8.c: Regenerated.
 628         * generated/maxloc1_8_i1.c: Regenerated.
 629         * generated/maxloc1_8_i16.c: Regenerated.
 630         * generated/maxloc1_8_i2.c: Regenerated.
 631         * generated/maxloc1_8_i4.c: Regenerated.
 632         * generated/maxloc1_8_i8.c: Regenerated.
 633         * generated/maxloc1_8_r10.c: Regenerated.
 634         * generated/maxloc1_8_r16.c: Regenerated.
 635         * generated/maxloc1_8_r4.c: Regenerated.
 636         * generated/maxloc1_8_r8.c: Regenerated.
 637         * generated/maxval_i1.c: Regenerated.
 638         * generated/maxval_i16.c: Regenerated.
 639         * generated/maxval_i2.c: Regenerated.
 640         * generated/maxval_i4.c: Regenerated.
 641         * generated/maxval_i8.c: Regenerated.
 642         * generated/maxval_r10.c: Regenerated.
 643         * generated/maxval_r16.c: Regenerated.
 644         * generated/maxval_r4.c: Regenerated.
 645         * generated/maxval_r8.c: Regenerated.
 646         * generated/minloc0_16_i1.c: Regenerated.
 647         * generated/minloc0_16_i16.c: Regenerated.
 648         * generated/minloc0_16_i2.c: Regenerated.
 649         * generated/minloc0_16_i4.c: Regenerated.
 650         * generated/minloc0_16_i8.c: Regenerated.
 651         * generated/minloc0_16_r10.c: Regenerated.
 652         * generated/minloc0_16_r16.c: Regenerated.
 653         * generated/minloc0_16_r4.c: Regenerated.
 654         * generated/minloc0_16_r8.c: Regenerated.
 655         * generated/minloc0_4_i1.c: Regenerated.
 656         * generated/minloc0_4_i16.c: Regenerated.
 657         * generated/minloc0_4_i2.c: Regenerated.
 658         * generated/minloc0_4_i4.c: Regenerated.
 659         * generated/minloc0_4_i8.c: Regenerated.
 660         * generated/minloc0_4_r10.c: Regenerated.
 661         * generated/minloc0_4_r16.c: Regenerated.
 662         * generated/minloc0_4_r4.c: Regenerated.
 663         * generated/minloc0_4_r8.c: Regenerated.
 664         * generated/minloc0_8_i1.c: Regenerated.
 665         * generated/minloc0_8_i16.c: Regenerated.
 666         * generated/minloc0_8_i2.c: Regenerated.
 667         * generated/minloc0_8_i4.c: Regenerated.
 668         * generated/minloc0_8_i8.c: Regenerated.
 669         * generated/minloc0_8_r10.c: Regenerated.
 670         * generated/minloc0_8_r16.c: Regenerated.
 671         * generated/minloc0_8_r4.c: Regenerated.
 672         * generated/minloc0_8_r8.c: Regenerated.
 673         * generated/minloc1_16_i1.c: Regenerated.
 674         * generated/minloc1_16_i16.c: Regenerated.
 675         * generated/minloc1_16_i2.c: Regenerated.
 676         * generated/minloc1_16_i4.c: Regenerated.
 677         * generated/minloc1_16_i8.c: Regenerated.
 678         * generated/minloc1_16_r10.c: Regenerated.
 679         * generated/minloc1_16_r16.c: Regenerated.
 680         * generated/minloc1_16_r4.c: Regenerated.
 681         * generated/minloc1_16_r8.c: Regenerated.
 682         * generated/minloc1_4_i1.c: Regenerated.
 683         * generated/minloc1_4_i16.c: Regenerated.
 684         * generated/minloc1_4_i2.c: Regenerated.
 685         * generated/minloc1_4_i4.c: Regenerated.
 686         * generated/minloc1_4_i8.c: Regenerated.
 687         * generated/minloc1_4_r10.c: Regenerated.
 688         * generated/minloc1_4_r16.c: Regenerated.
 689         * generated/minloc1_4_r4.c: Regenerated.
 690         * generated/minloc1_4_r8.c: Regenerated.
 691         * generated/minloc1_8_i1.c: Regenerated.
 692         * generated/minloc1_8_i16.c: Regenerated.
 693         * generated/minloc1_8_i2.c: Regenerated.
 694         * generated/minloc1_8_i4.c: Regenerated.
 695         * generated/minloc1_8_i8.c: Regenerated.
 696         * generated/minloc1_8_r10.c: Regenerated.
 697         * generated/minloc1_8_r16.c: Regenerated.
 698         * generated/minloc1_8_r4.c: Regenerated.
 699         * generated/minloc1_8_r8.c: Regenerated.
 700         * generated/minval_i1.c: Regenerated.
 701         * generated/minval_i16.c: Regenerated.
 702         * generated/minval_i2.c: Regenerated.
 703         * generated/minval_i4.c: Regenerated.
 704         * generated/minval_i8.c: Regenerated.
 705         * generated/minval_r10.c: Regenerated.
 706         * generated/minval_r16.c: Regenerated.
 707         * generated/minval_r4.c: Regenerated.
 708         * generated/minval_r8.c: Regenerated.
 709         * generated/product_c10.c: Regenerated.
 710         * generated/product_c16.c: Regenerated.
 711         * generated/product_c4.c: Regenerated.
 712         * generated/product_c8.c: Regenerated.
 713         * generated/product_i1.c: Regenerated.
 714         * generated/product_i16.c: Regenerated.
 715         * generated/product_i2.c: Regenerated.
 716         * generated/product_i4.c: Regenerated.
 717         * generated/product_i8.c: Regenerated.
 718         * generated/product_r10.c: Regenerated.
 719         * generated/product_r16.c: Regenerated.
 720         * generated/product_r4.c: Regenerated.
 721         * generated/product_r8.c: Regenerated.
 722         * generated/sum_c10.c: Regenerated.
 723         * generated/sum_c16.c: Regenerated.
 724         * generated/sum_c4.c: Regenerated.
 725         * generated/sum_c8.c: Regenerated.
 726         * generated/sum_i1.c: Regenerated.
 727         * generated/sum_i16.c: Regenerated.
 728         * generated/sum_i2.c: Regenerated.
 729         * generated/sum_i4.c: Regenerated.
 730         * generated/sum_i8.c: Regenerated.
 731         * generated/sum_r10.c: Regenerated.
 732         * generated/sum_r16.c: Regenerated.
 733         * generated/sum_r4.c: Regenerated.
 734         * generated/sum_r8.c: Regenerated.
 735
 736 2009-07-17  Janne Blomqvist  <jb@gcc.gnu.org>
 737             Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 738
 739         PR libfortran/40714
 740         * io/transfer.c (finalize_transfer): Set current_record to 0
 741         before returning in case of error.
 742
 743 2009-07-12  Tobias Burnus  <burnus@net-b.de>
 744
 745         PR libfortran/22423
 746         * io/io.h (namelist_type): Use the proper enum for GFC_DTYPE_*.
 747         * intrinsics/iso_c_binding.c (c_f_pointer_u0): Make sure
 748         variable is initialized to silence warning.
 749
 750 2009-07-10  Steven G. Kargl  <kargl@gcc.gnu.org>
 751
 752         * c99_functions.c (ccoshf, ccosh, ccoshl, ctanhf, ctanh, ctanl):
 753         Fix errant minus.
 754
 755 2009-07-08  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 756
 757         PR libfortran/40330
 758         PR libfortran/40662
 759         * io/io.h (st_parameter_dt): Define format_not_saved bit used to signal
 760         whether the parsed format data was previously saved. Used to determine
 761         if the current format data should be freed or not.
 762         * io/transfer.c (st_read_done): Use the format_not_saved bit.
 763         (st_write_done): Likewise.
 764         * io/format.c (parse_format_list): Add boolean pointer to arg list. This
 765         pointer is used to return status to the caller regarding whether it is
 766         safe to cache the parsed format data.  Currently, if a FMT_STRING token
 767         is encounetered, it is not safe to cache. Also, added a local boolean
 768         variable to hold this information as recursive calls to
 769         parse_format_list are made.  Remove previous save_format logic.
 770         (parse_format): Do not use the format caching facility if the current
 771         unit is an internal unit or if it is not safe to save parsed format
 772         data.
 773
 774 2009-06-29  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 775
 776         PR libfortran/40576
 777         * io/transfer.c (sset): Adjust exit condition for loop.
 778
 779 2009-06-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 780
 781         PR libfortran/40508
 782         * io/format.c: Don't save parsed format data for internal units.
 783
 784 2009-06-21  Thomas Koenig  <tkoenig@gcc.gnu.org>
 785
 786         PR fortran/37577
 787         Port from fortran-dev
 788         * runtime/in_pack_generic (internal_pack):  Remove unnecessary
 789         test for stride == 0.
 790         * runtime/in_unpack_generic.c (internal_unpack):  Likewise.
 791         * intrinsics/iso_c_binding.c (c_f_pointer_u0):  Take care
 792         of stride in "shape" argument.  Use array access macros for
 793         accessing array descriptors.
 794         * libgfortran.h (struct descriptor_dimension):  Change stride
 795         to _stride, lbound to _lbound and ubound to _ubound.
 796         (GFC_DIMENSION_LBOUND):  Use new name(s) in struct
 797         descriptor_dimension.
 798         (GFC_DIMENSION_UBOUND):  Likewise.
 799         (GFC_DIMENSION_STRIDE):  Likewise.
 800         (GFC_DIMENSION_EXTENT):  Likewise.
 801         (GFC_DIMENSION_SET):  Likewise.
 802         (GFC_DESCRIPTOR_LBOUND):  Likewise.
 803         (GFC_DESCRIPTOR_UBOUND):  Likewise.
 804         (GFC_DESCRIPTOR_EXTENT):  Likewise.
 805         (GFC_DESCRIPTOR_STRIDE):  Likewise.
 806         * io/transfer.c (transfer_array):  Use array access macros.
 807         Use byte-sized strides.
 808         * intrinsics/eoshift0.c (eoshift0):  Use array access
 809         macros everywhere.
 810         * m4/in_pack.m4 (internal_pack_'rtype_ccode`):  Use
 811         array access macros for accessing array descriptors.
 812         * m4/in_unpack.m4 (internal_unpack_'rtype_ccode`):
 813         Likewise.
 814         * m4/matmull.m4 (matmul_'rtype_code`):  Likewise.
 815         * m4/matmul.m4 (matmul_'rtype_code`):  Likewise.
 816         * m4/unpack.m4 (unpack0_'rtype_code`):  Likewise.
 817         (unpack1_'rtype_code`):  Likewise.
 818         * m4/ifunction_logical.m4 (name`'rtype_qual`_'atype_code): Likewise.
 819         * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): Use array access
 820         macros everywhere.
 821                 * intrinsics/dtime.c (dtime_sub):  Use array access macros
 822         for accessing array descriptors.
 823         * intrinsics/cshift0 (cshift0):  Likewise.
 824         * intrinsics/etime.c:  Likewise.  Remove redundant calculation
 825         of rdim.
 826         * m4/cshift0.m4 (cshift0_'rtype_code`):  Use array access macros
 827         for accessing array descriptors.
 828         * m4/pack.m4 (pack_'rtype_code`):  Likewise.
 829         * m4/spread.m4 (spread_'rtype_code`):  Likewise.
 830         (spread_scalar_'rtype_code`):  Likewise.
 831         * m4/transpose.m4 (transpose_'rtype_code`):  Likewise.
 832         * m4/iforeach.m4 (name`'rtype_qual`_'atype_code):  Likewise.
 833         * m4/eoshift1.m4 (eoshift1):  Likewise.  Remove size argument,
 834         calculate within function.
 835         (eoshift1_'atype_kind`):  Remove size argument from call
 836         to eoshift1.
 837         (eoshift1_'atype_kind`_char):  Likewise.
 838         (eoshift1_'atype_kind`_char4):  Likewise.
 839         * m4/eoshift3.m4 (eoshift3):  Remove size argument, calculate
 840         within function. Use array access macros for accessing array
 841         descriptors.
 842         (eoshift3_'atype_kind`):  Remove size argument from call
 843         to eoshift1.
 844         (eoshift3_'atype_kind`_char):  Likewise.
 845         (eoshift3_'atype_kind`_char4):  Likewise.
 846         * m4/shape.m4 (shape_'rtype_kind`):  Use array access macros
 847         for accessing array descriptors.
 848         * m4/cshift1.m4 (cshift1): Remove size argument, calculate
 849         within function. Use array access macros for accessing array
 850         descriptors.
 851         (cshift1_'atype_kind`):  Remove size argument from call to
 852         cshift1.
 853         (cshift1_'atype_kind`_char):  Remove size argument from call to
 854         cshift1.
 855         (cshift1_'atype_kind`_char4):  Remove size argument from call to
 856         cshift1.
 857         * m4/reshape.m4 (reshape_'rtype_ccode`):  Use array access macros
 858         for accessing array descriptors.
 859         * m4/ifunction.m4 (name`'rtype_qual`_'atype_code):  Likewise.
 860         * intrinsics/pack_generic.c (pack_internal):  Use array access
 861         macros for accessing array descriptors.
 862         (pack_s_internal):  Likewise.
 863         * intrinsics/transpose_generic.c (transpose_internal):  Remove
 864         size argument, calculate from array descriptor. Use array
 865         access macros for accessing array descriptors.
 866         (transpose):  Remove size argument from call.
 867         (transpoe_char):  Likewise.
 868         (transpose_char4):  Likewise.
 869         * intrinsics/move_alloc.c (move_alloc):  Use array access macros
 870         for accessing array descriptors.
 871         * intrinsics/spread_generic.c (spread_internal):  Remove size
 872         argument, calculate from array descriptor.  Use array access
 873         macros for accessing array descriptors.
 874         (spread_internal_scalar):  Likewise.
 875         (spread):  Remove size argument from call to spread_internal.
 876         (spread_char):  Mark argument source_length as unused.
 877         Remove size argument from call to spread_internal.
 878         (spread_char4):  Likewise.
 879         (spread_char_scalar):  Likewise.
 880         (spread_char4_scalar):  Likewise.
 881         * intrinsics/unpack_generic.c (unpack_internal):  Use array access
 882         macros for accessing array descriptors.
 883         * intrinsics/eoshift2.c (eoshift2):  Remove size argument, calculate
 884         from array descriptor instead.  Use array access macros for
 885         accessing array descriptors.
 886         (eoshift2_##N):  Remove size argument from call to eoshift2.
 887         (eoshift2_##N_##char):  Likewise.
 888         (eoshift2_##N_##char4):  Likewise.
 889         * intrinsics/reshape_generic.c (reshape_internal):  Use array
 890         access macross for accessing array descriptors.
 891         * libgfortran.h:  Introduce new macros GFC_DIMENSION_LBOUND,
 892         GFC_DIMENSION_UBOUND,GFC_DIMENSION_STRIDE, GFC_DIMENSION_EXTENT,
 893         GFC_DIMENSION_SET, GFC_DESCRIPTOR_LBOUND, GFC_DESCRIPTOR_UBOUND,
 894         GFC_DESCRIPTOR_EXTENT, GFC_DESCRIPTOR_EXTENT_BYTES,
 895         GFC_DESCRIPTOR_STRIDE, GFC_DESCRIPTOR_STRIDE_BYTES
 896         * runtime/in_pack_generic.c (internal_pack):  Use new macros
 897         for array descriptor access.
 898         * runtime/in_unpack_generic.c (internal_unpack):  Likewise.
 899         * intrinsics/dtime.c (dtime_sub):  Likewise.
 900         * intrinsics/cshift0 (cshift0):  Remove argument size,
 901         calculate directly from the array descriptor.  Use new macros
 902         for array descriptor access.
 903         * cshift0_##N:  Remove shift argument in call to cshift0.
 904         * cshift0_##N_char:  Mark array_length as unused.  Remove
 905         array_length in call to cshift0.
 906         * cshift0_##N_char4:  Likewise.
 907         * intrisics/etime.c:  Use new macros for array descriptor access.
 908         * intrinsics/stat.c (stat_i4_sub_0):  Likewise.
 909         (stat_i8_sub_0):  Likewise.
 910         (fstat_i4_sub):  Likewise.
 911         (fstat_i8_sub):  Likewise.
 912         * intrinsics/date_and_time.c (date_and_time):  Likewise.
 913         (secnds):  Likewise.
 914         (itime_i4):  Likewise.
 915         (itime_i8):  Likewise.
 916         (idate_i4):  Likewise.
 917         (idate_i8):  Likewise.
 918         (gmtime_i4):  Likewise.
 919         (gmtime_i8):  Likewise.
 920         (ltime_i4):  Likewise.
 921         (litme_i8):  Likewise.
 922         * intrinsics/associated.c (associated):  Likewise.
 923         * intrinsics/eoshift0.c (eoshift0):  Likewise.
 924         * intriniscs/size.c (size0):  Likewise.
 925         * intrinsics/random.c (arandom_r4):  Likewise.
 926         (arandom_r8):  Likewise.
 927         (arandom_r10):  Likewise.
 928         (arandom_r16):  Likewise.
 929         (random_seed_i4):  Likewise.
 930         (random_seed_i8):  Likewise.
 931         * io/list_read.c (nml_parse_qualifier):  Likewise.
 932         (nml_touch_nodes):  Likewise.
 933         (nml_read_obj):  Likewise.
 934         (get_name):  Likewise.
 935         * io/transfer.c (transfer_array):  Likewise.
 936         (init_loop_spec):  Likewise.
 937         (st_set_nml_var_dim):  Likewise.
 938         * io/write.c (nml_write_obj):  Likewise.
 939         (obj_loop):  Likewise.
 940         * generated/all_l1.c: Regenerated.
 941         * generated/all_l16.c: Regenerated.
 942         * generated/all_l2.c: Regenerated.
 943         * generated/all_l4.c: Regenerated.
 944         * generated/all_l8.c: Regenerated.
 945         * generated/any_l1.c: Regenerated.
 946         * generated/any_l16.c: Regenerated.
 947         * generated/any_l2.c: Regenerated.
 948         * generated/any_l4.c: Regenerated.
 949         * generated/any_l8.c: Regenerated.
 950         * generated/count_16_l.c: Regenerated.
 951         * generated/count_1_l.c: Regenerated.
 952         * generated/count_2_l.c: Regenerated.
 953         * generated/count_4_l.c: Regenerated.
 954         * generated/count_8_l.c: Regenerated.
 955         * generated/cshift0_c10.c: Regenerated.
 956         * generated/cshift0_c16.c: Regenerated.
 957         * generated/cshift0_c4.c: Regenerated.
 958         * generated/cshift0_c8.c: Regenerated.
 959         * generated/cshift0_i1.c: Regenerated.
 960         * generated/cshift0_i16.c: Regenerated.
 961         * generated/cshift0_i2.c: Regenerated.
 962         * generated/cshift0_i4.c: Regenerated.
 963         * generated/cshift0_i8.c: Regenerated.
 964         * generated/cshift0_r10.c: Regenerated.
 965         * generated/cshift0_r16.c: Regenerated.
 966         * generated/cshift0_r4.c: Regenerated.
 967         * generated/cshift0_r8.c: Regenerated.
 968         * generated/cshift1_16.c: Regenerated.
 969         * generated/cshift1_4.c: Regenerated.
 970         * generated/cshift1_8.c: Regenerated.
 971         * generated/eoshift1_16.c: Regenerated.
 972         * generated/eoshift1_4.c: Regenerated.
 973         * generated/eoshift1_8.c: Regenerated.
 974         * generated/eoshift3_16.c: Regenerated.
 975         * generated/eoshift3_4.c: Regenerated.
 976         * generated/eoshift3_8.c: Regenerated.
 977         * generated/in_pack_c10.c: Regenerated.
 978         * generated/in_pack_c16.c: Regenerated.
 979         * generated/in_pack_c4.c: Regenerated.
 980         * generated/in_pack_c8.c: Regenerated.
 981         * generated/in_pack_i1.c: Regenerated.
 982         * generated/in_pack_i16.c: Regenerated.
 983         * generated/in_pack_i2.c: Regenerated.
 984         * generated/in_pack_i4.c: Regenerated.
 985         * generated/in_pack_i8.c: Regenerated.
 986         * generated/in_pack_r10.c: Regenerated.
 987         * generated/in_pack_r16.c: Regenerated.
 988         * generated/in_pack_r4.c: Regenerated.
 989         * generated/in_pack_r8.c: Regenerated.
 990         * generated/in_unpack_c10.c: Regenerated.
 991         * generated/in_unpack_c16.c: Regenerated.
 992         * generated/in_unpack_c4.c: Regenerated.
 993         * generated/in_unpack_c8.c: Regenerated.
 994         * generated/in_unpack_i1.c: Regenerated.
 995         * generated/in_unpack_i16.c: Regenerated.
 996         * generated/in_unpack_i2.c: Regenerated.
 997         * generated/in_unpack_i4.c: Regenerated.
 998         * generated/in_unpack_i8.c: Regenerated.
 999         * generated/in_unpack_r10.c: Regenerated.
1000         * generated/in_unpack_r16.c: Regenerated.
1001         * generated/in_unpack_r4.c: Regenerated.
1002         * generated/in_unpack_r8.c: Regenerated.
1003         * generated/matmul_c10.c: Regenerated.
1004         * generated/matmul_c16.c: Regenerated.
1005         * generated/matmul_c4.c: Regenerated.
1006         * generated/matmul_c8.c: Regenerated.
1007         * generated/matmul_i1.c: Regenerated.
1008         * generated/matmul_i16.c: Regenerated.
1009         * generated/matmul_i2.c: Regenerated.
1010         * generated/matmul_i4.c: Regenerated.
1011         * generated/matmul_i8.c: Regenerated.
1012         * generated/matmul_l16.c: Regenerated.
1013         * generated/matmul_l4.c: Regenerated.
1014         * generated/matmul_l8.c: Regenerated.
1015         * generated/matmul_r10.c: Regenerated.
1016         * generated/matmul_r16.c: Regenerated.
1017         * generated/matmul_r4.c: Regenerated.
1018         * generated/matmul_r8.c: Regenerated.
1019         * generated/maxloc0_16_i1.c: Regenerated.
1020         * generated/maxloc0_16_i16.c: Regenerated.
1021         * generated/maxloc0_16_i2.c: Regenerated.
1022         * generated/maxloc0_16_i4.c: Regenerated.
1023         * generated/maxloc0_16_i8.c: Regenerated.
1024         * generated/maxloc0_16_r10.c: Regenerated.
1025         * generated/maxloc0_16_r16.c: Regenerated.
1026         * generated/maxloc0_16_r4.c: Regenerated.
1027         * generated/maxloc0_16_r8.c: Regenerated.
1028         * generated/maxloc0_4_i1.c: Regenerated.
1029         * generated/maxloc0_4_i16.c: Regenerated.
1030         * generated/maxloc0_4_i2.c: Regenerated.
1031         * generated/maxloc0_4_i4.c: Regenerated.
1032         * generated/maxloc0_4_i8.c: Regenerated.
1033         * generated/maxloc0_4_r10.c: Regenerated.
1034         * generated/maxloc0_4_r16.c: Regenerated.
1035         * generated/maxloc0_4_r4.c: Regenerated.
1036         * generated/maxloc0_4_r8.c: Regenerated.
1037         * generated/maxloc0_8_i1.c: Regenerated.
1038         * generated/maxloc0_8_i16.c: Regenerated.
1039         * generated/maxloc0_8_i2.c: Regenerated.
1040         * generated/maxloc0_8_i4.c: Regenerated.
1041         * generated/maxloc0_8_i8.c: Regenerated.
1042         * generated/maxloc0_8_r10.c: Regenerated.
1043         * generated/maxloc0_8_r16.c: Regenerated.
1044         * generated/maxloc0_8_r4.c: Regenerated.
1045         * generated/maxloc0_8_r8.c: Regenerated.
1046         * generated/maxloc1_16_i1.c: Regenerated.
1047         * generated/maxloc1_16_i16.c: Regenerated.
1048         * generated/maxloc1_16_i2.c: Regenerated.
1049         * generated/maxloc1_16_i4.c: Regenerated.
1050         * generated/maxloc1_16_i8.c: Regenerated.
1051         * generated/maxloc1_16_r10.c: Regenerated.
1052         * generated/maxloc1_16_r16.c: Regenerated.
1053         * generated/maxloc1_16_r4.c: Regenerated.
1054         * generated/maxloc1_16_r8.c: Regenerated.
1055         * generated/maxloc1_4_i1.c: Regenerated.
1056         * generated/maxloc1_4_i16.c: Regenerated.
1057         * generated/maxloc1_4_i2.c: Regenerated.
1058         * generated/maxloc1_4_i4.c: Regenerated.
1059         * generated/maxloc1_4_i8.c: Regenerated.
1060         * generated/maxloc1_4_r10.c: Regenerated.
1061         * generated/maxloc1_4_r16.c: Regenerated.
1062         * generated/maxloc1_4_r4.c: Regenerated.
1063         * generated/maxloc1_4_r8.c: Regenerated.
1064         * generated/maxloc1_8_i1.c: Regenerated.
1065         * generated/maxloc1_8_i16.c: Regenerated.
1066         * generated/maxloc1_8_i2.c: Regenerated.
1067         * generated/maxloc1_8_i4.c: Regenerated.
1068         * generated/maxloc1_8_i8.c: Regenerated.
1069         * generated/maxloc1_8_r10.c: Regenerated.
1070         * generated/maxloc1_8_r16.c: Regenerated.
1071         * generated/maxloc1_8_r4.c: Regenerated.
1072         * generated/maxloc1_8_r8.c: Regenerated.
1073         * generated/maxval_i1.c: Regenerated.
1074         * generated/maxval_i16.c: Regenerated.
1075         * generated/maxval_i2.c: Regenerated.
1076         * generated/maxval_i4.c: Regenerated.
1077         * generated/maxval_i8.c: Regenerated.
1078         * generated/maxval_r10.c: Regenerated.
1079         * generated/maxval_r16.c: Regenerated.
1080         * generated/maxval_r4.c: Regenerated.
1081         * generated/maxval_r8.c: Regenerated.
1082         * generated/minloc0_16_i1.c: Regenerated.
1083         * generated/minloc0_16_i16.c: Regenerated.
1084         * generated/minloc0_16_i2.c: Regenerated.
1085         * generated/minloc0_16_i4.c: Regenerated.
1086         * generated/minloc0_16_i8.c: Regenerated.
1087         * generated/minloc0_16_r10.c: Regenerated.
1088         * generated/minloc0_16_r16.c: Regenerated.
1089         * generated/minloc0_16_r4.c: Regenerated.
1090         * generated/minloc0_16_r8.c: Regenerated.
1091         * generated/minloc0_4_i1.c: Regenerated.
1092         * generated/minloc0_4_i16.c: Regenerated.
1093         * generated/minloc0_4_i2.c: Regenerated.
1094         * generated/minloc0_4_i4.c: Regenerated.
1095         * generated/minloc0_4_i8.c: Regenerated.
1096         * generated/minloc0_4_r10.c: Regenerated.
1097         * generated/minloc0_4_r16.c: Regenerated.
1098         * generated/minloc0_4_r4.c: Regenerated.
1099         * generated/minloc0_4_r8.c: Regenerated.
1100         * generated/minloc0_8_i1.c: Regenerated.
1101         * generated/minloc0_8_i16.c: Regenerated.
1102         * generated/minloc0_8_i2.c: Regenerated.
1103         * generated/minloc0_8_i4.c: Regenerated.
1104         * generated/minloc0_8_i8.c: Regenerated.
1105         * generated/minloc0_8_r10.c: Regenerated.
1106         * generated/minloc0_8_r16.c: Regenerated.
1107         * generated/minloc0_8_r4.c: Regenerated.
1108         * generated/minloc0_8_r8.c: Regenerated.
1109         * generated/minloc1_16_i1.c: Regenerated.
1110         * generated/minloc1_16_i16.c: Regenerated.
1111         * generated/minloc1_16_i2.c: Regenerated.
1112         * generated/minloc1_16_i4.c: Regenerated.
1113         * generated/minloc1_16_i8.c: Regenerated.
1114         * generated/minloc1_16_r10.c: Regenerated.
1115         * generated/minloc1_16_r16.c: Regenerated.
1116         * generated/minloc1_16_r4.c: Regenerated.
1117         * generated/minloc1_16_r8.c: Regenerated.
1118         * generated/minloc1_4_i1.c: Regenerated.
1119         * generated/minloc1_4_i16.c: Regenerated.
1120         * generated/minloc1_4_i2.c: Regenerated.
1121         * generated/minloc1_4_i4.c: Regenerated.
1122         * generated/minloc1_4_i8.c: Regenerated.
1123         * generated/minloc1_4_r10.c: Regenerated.
1124         * generated/minloc1_4_r16.c: Regenerated.
1125         * generated/minloc1_4_r4.c: Regenerated.
1126         * generated/minloc1_4_r8.c: Regenerated.
1127         * generated/minloc1_8_i1.c: Regenerated.
1128         * generated/minloc1_8_i16.c: Regenerated.
1129         * generated/minloc1_8_i2.c: Regenerated.
1130         * generated/minloc1_8_i4.c: Regenerated.
1131         * generated/minloc1_8_i8.c: Regenerated.
1132         * generated/minloc1_8_r10.c: Regenerated.
1133         * generated/minloc1_8_r16.c: Regenerated.
1134         * generated/minloc1_8_r4.c: Regenerated.
1135         * generated/minloc1_8_r8.c: Regenerated.
1136         * generated/minval_i1.c: Regenerated.
1137         * generated/minval_i16.c: Regenerated.
1138         * generated/minval_i2.c: Regenerated.
1139         * generated/minval_i4.c: Regenerated.
1140         * generated/minval_i8.c: Regenerated.
1141         * generated/minval_r10.c: Regenerated.
1142         * generated/minval_r16.c: Regenerated.
1143         * generated/minval_r4.c: Regenerated.
1144         * generated/minval_r8.c: Regenerated.
1145         * generated/pack_c10.c: Regenerated.
1146         * generated/pack_c16.c: Regenerated.
1147         * generated/pack_c4.c: Regenerated.
1148         * generated/pack_c8.c: Regenerated.
1149         * generated/pack_i1.c: Regenerated.
1150         * generated/pack_i16.c: Regenerated.
1151         * generated/pack_i2.c: Regenerated.
1152         * generated/pack_i4.c: Regenerated.
1153         * generated/pack_i8.c: Regenerated.
1154         * generated/pack_r10.c: Regenerated.
1155         * generated/pack_r16.c: Regenerated.
1156         * generated/pack_r4.c: Regenerated.
1157         * generated/pack_r8.c: Regenerated.
1158         * generated/product_c10.c: Regenerated.
1159         * generated/product_c16.c: Regenerated.
1160         * generated/product_c4.c: Regenerated.
1161         * generated/product_c8.c: Regenerated.
1162         * generated/product_i1.c: Regenerated.
1163         * generated/product_i16.c: Regenerated.
1164         * generated/product_i2.c: Regenerated.
1165         * generated/product_i4.c: Regenerated.
1166         * generated/product_i8.c: Regenerated.
1167         * generated/product_r10.c: Regenerated.
1168         * generated/product_r16.c: Regenerated.
1169         * generated/product_r4.c: Regenerated.
1170         * generated/product_r8.c: Regenerated.
1171         * generated/reshape_c10.c: Regenerated.
1172         * generated/reshape_c16.c: Regenerated.
1173         * generated/reshape_c4.c: Regenerated.
1174         * generated/reshape_c8.c: Regenerated.
1175         * generated/reshape_i16.c: Regenerated.
1176         * generated/reshape_i4.c: Regenerated.
1177         * generated/reshape_i8.c: Regenerated.
1178         * generated/reshape_r10.c: Regenerated.
1179         * generated/reshape_r16.c: Regenerated.
1180         * generated/reshape_r4.c: Regenerated.
1181         * generated/reshape_r8.c: Regenerated.
1182         * generated/shape_i16.c: Regenerated.
1183         * generated/shape_i4.c: Regenerated.
1184         * generated/shape_i8.c: Regenerated.
1185         * generated/spread_c10.c: Regenerated.
1186         * generated/spread_c16.c: Regenerated.
1187         * generated/spread_c4.c: Regenerated.
1188         * generated/spread_c8.c: Regenerated.
1189         * generated/spread_i1.c: Regenerated.
1190         * generated/spread_i16.c: Regenerated.
1191         * generated/spread_i2.c: Regenerated.
1192         * generated/spread_i4.c: Regenerated.
1193         * generated/spread_i8.c: Regenerated.
1194         * generated/spread_r10.c: Regenerated.
1195         * generated/spread_r16.c: Regenerated.
1196         * generated/spread_r4.c: Regenerated.
1197         * generated/spread_r8.c: Regenerated.
1198         * generated/sum_c10.c: Regenerated.
1199         * generated/sum_c16.c: Regenerated.
1200         * generated/sum_c4.c: Regenerated.
1201         * generated/sum_c8.c: Regenerated.
1202         * generated/sum_i1.c: Regenerated.
1203         * generated/sum_i16.c: Regenerated.
1204         * generated/sum_i2.c: Regenerated.
1205         * generated/sum_i4.c: Regenerated.
1206         * generated/sum_i8.c: Regenerated.
1207         * generated/sum_r10.c: Regenerated.
1208         * generated/sum_r16.c: Regenerated.
1209         * generated/sum_r4.c: Regenerated.
1210         * generated/sum_r8.c: Regenerated.
1211         * generated/transpose_c10.c: Regenerated.
1212         * generated/transpose_c16.c: Regenerated.
1213         * generated/transpose_c4.c: Regenerated.
1214         * generated/transpose_c8.c: Regenerated.
1215         * generated/transpose_i16.c: Regenerated.
1216         * generated/transpose_i4.c: Regenerated.
1217         * generated/transpose_i8.c: Regenerated.
1218         * generated/transpose_r10.c: Regenerated.
1219         * generated/transpose_r16.c: Regenerated.
1220         * generated/transpose_r4.c: Regenerated.
1221         * generated/transpose_r8.c: Regenerated.
1222         * generated/unpack_c10.c: Regenerated.
1223         * generated/unpack_c16.c: Regenerated.
1224         * generated/unpack_c4.c: Regenerated.
1225         * generated/unpack_c8.c: Regenerated.
1226         * generated/unpack_i1.c: Regenerated.
1227         * generated/unpack_i16.c: Regenerated.
1228         * generated/unpack_i2.c: Regenerated.
1229         * generated/unpack_i4.c: Regenerated.
1230         * generated/unpack_i8.c: Regenerated.
1231         * generated/unpack_r10.c: Regenerated.
1232         * generated/unpack_r16.c: Regenerated.
1233         * generated/unpack_r4.c: Regenerated.
1234         * generated/unpack_r8.c: Regenerated.
1235
1236 2009-06-14 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
1237
1238         * fmain.c (main): Don't PREFIX set_args.
1239         * libgfortran.h (set_args): Use iexport_proto.
1240         * runtime/main.c (set_args): Use iexport.
1241
1242 2009-06-07  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1243
1244         PR libfortran/40008
1245         * libgfortran.h: Define IOPARM_OPEN_HAS_NEWUNIT.
1246         * io/open.c (st_open): Don't error on negative unit number if NEWUNIT
1247         was specified. If NEWUNIT is specified, call new function to get the
1248         unique unit number and assign it.
1249         * io/io.h (st_parameter_open): Add pointer to newunit.  Add prototype for
1250         next_available_newunit. Add prototype for new function,
1251         get_unique_unit_number.
1252         * io/unit.c: Declare next_available_newunit. Define the first newunit
1253         number. (init_units): Initialize next_available_unit.
1254         (get_unique_unit_number): New function. Fix whitespace and comments.
1255         * io/transfer.c (data_transfer_init): Update error message to not be
1256         specific to OPEN statements.
1257
1258 2009-06-07  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1259
1260         PR libfortran/40334
1261         * io/list_read.c (list_formatted_read_scalar): Set the end file
1262         conditions after a return from EOF error.
1263
1264 2009-06-04  Janne Blomqvist  <jb@gcc.gnu.org>
1265
1266         PR libfortran/40330
1267         * io/format.c (free_format_hash_table): Also free and nullify hash key.
1268         (save_parsed_format): Copy string rather than pointer copy.
1269
1270 2009-05-29  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
1271
1272         PR fortran/40019
1273         * intrinsics/bit_intrinsics.c: New file.
1274         * gfortran.map (GFORTRAN_1.2): New list.
1275         * Makefile.am: Add intrinsics/bit_intrinsics.c.
1276         * Makefile.in: Regenerate.
1277
1278 2009-05-29  Janne Blomqvist  <jb@gcc.gnu.org>
1279
1280         PR libfortran/40190
1281         * configure.ac: Check for localtime_r and gmtime_r.
1282         * intrinsics/date_and_time.c: Add fallback implementations for
1283         localtime_r and gmtime_r.
1284         (date_and_time): Change to use localtime_r and gmtime_r instead of
1285         localtime and gmtime, respectively.
1286         (itime0): Use localtime_r instead of localtime.
1287         (ltime_0): Likewise.
1288         (gmtime_0): Use gmtime_r instead of gmtime.
1289         * config.h.in: Regenerated
1290         * configure: Regenerated.
1291
1292 2009-05-27  Janne Blomqvist  <jb@gcc.gnu.org>
1293
1294         PR fortran/39178
1295         * runtime/main.c (store_exe_path): Remove static attribute.
1296         * libgfortran.h: Add back store_exe_path prototype.
1297
1298 2009-05-27  Thomas Koenig  <tkoenig@gcc.gnu.org>
1299
1300         PR libfortran/40187
1301         * intrinsics/iso_c_binding.c (c_f_pointer_u0):  Take care
1302         of stride in "shape" argument.
1303
1304 2009-05-26  Tobias Burnus  <burnus@net-b.de>
1305
1306         PR fortran/39178
1307         * runtime/main.c (store_exe_path): Make static
1308         and multiple-times callable.
1309         (set_args): Call store_exe_path.
1310         * libgfortran.h: Remove store_exe_path prototype.
1311         * fmain.c (main): Remove store_exe_path call.
1312
1313 2009-05-19  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1314
1315         PR libfortran/37754
1316         * io/write_float.def: Simplify format calculation.
1317
1318 2009-05-07  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
1319
1320         PR fortran/22423
1321         * io/transfer.c (read_block_direct): Avoid warning.
1322         * runtime/string.c (compare0): Avoid warning.
1323
1324 2009-04-30  Janne Blomqvist  <jb@gcc.gnu.org>
1325
1326         PR libfortran/39667
1327         * io/file_pos.c (st_rewind): Don't truncate or flush.
1328         * io/intrinsics.c (fgetc): Flush if switching mode.
1329         (fputc): Likewise.
1330
1331 2009-04-18  Janne Blomqvist  <jb@gcc.gnu.org>
1332
1333         PR libfortran/39782
1334         * io/transfer.c (data_transfer_init): Don't flush before seek.
1335         (finalize_transfer): Remove extra flush.
1336
1337 2009-04-17  Janne Blomqvist  <jb@gcc.gnu.org>
1338
1339         * io/io.h (is_preconnected): Remove prototype.
1340         * io/unix.c (is_preconnected): Remove function.
1341
1342 2009-04-17  Ulrich Weigand  <Ulrich.Weigand@de.ibm.com>
1343
1344         * configure.ac: Test for -ffunction-sections -fdata-sections and
1345         set SECTION_FLAGS accordingly.
1346         * configure: Regenerate.
1347
1348         * Makefile.am: Add SECTION_FLAGS to AM_CFLAGS.
1349         * Makefile.in: Regenerate.
1350
1351 2009-04-15  Janne Blomqvist  <jb@gcc.gnu.org>
1352
1353         PR libfortran/38668
1354         * io/transfer.c (finalize_transfer): Don't flush for advance='no'.
1355
1356 2009-04-15 Danny Smith  <dannysmith@clear.net.nz>
1357
1358         * io/write.c (itoa) : Rename back to gfc_itoa.
1359         (write_i): Adjust call to write_decimal.
1360         (write_integer):  Use gfc_itoa.
1361
1362 2009-04-10  Janne Blomqvist  <jb@gcc.gnu.org>
1363
1364         * io/io.h (move_pos_offset): Remove prototype.
1365         * io/transfer.c (formatted_transfer_scalar_read): Use sseek
1366         instead of move_pos_offset.
1367         * io/unix.c (move_pos_offset): Remove.
1368
1369 2009-04-10  Janne Blomqvist  <jb@gcc.gnu.org>
1370
1371         PR libfortran/39665 libfortran/39702 libfortran/39709
1372         * io/io.h (st_parameter_dt): Revert aligned attribute from u.p.value.
1373         * io/list_read.c (read_complex): Read directly into user pointer.
1374         (read_real): Likewise.
1375         (list_formatted_read_scalar): Update read_complex and read_real calls.
1376         (nml_read_obj): Read directly into user pointer.
1377
1378 2009-04-09  Janne Blomqvist  <jb@gcc.gnu.org>
1379
1380         PR libfortran/39665
1381         * io/io.h (st_parameter_dt): Add aligned attribute to u.p.value.
1382         * io/read.c (convert_real): Add note about alignment requirements.
1383
1384 2009-04-09  Nick Clifton  <nickc@redhat.com>
1385
1386         * m4/cshift0.m4: Change copyright header to refer to version 3
1387         of the GNU General Public License with version 3.1 of the GCC
1388         Runtime Library Exception and to point readers at the COPYING3
1389         and COPYING3.RUNTIME files and the FSF's license web page.
1390         * c99_protos.h: Likewise.
1391         * config/fpu-387.h: Likewise.
1392         * config/fpu-aix.h: Likewise.
1393         * config/fpu-generic.h: Likewise.
1394         * config/fpu-glibc.h: Likewise.
1395         * config/fpu-sysv.h: Likewise.
1396         * intrinsics/abort.c: Likewise.
1397         * intrinsics/access.c: Likewise.
1398         * intrinsics/args.c: Likewise.
1399         * intrinsics/associated.c: Likewise.
1400         * intrinsics/c99_functions.c: Likewise.
1401         * intrinsics/chdir.c: Likewise.
1402         * intrinsics/chmod.c: Likewise.
1403         * intrinsics/clock.c: Likewise.
1404         * intrinsics/cpu_time.c: Likewise.
1405         * intrinsics/cshift0.c: Likewise.
1406         * intrinsics/ctime.c: Likewise.
1407         * intrinsics/date_and_time.c: Likewise.
1408         * intrinsics/dprod_r8.f90: Likewise.
1409         * intrinsics/dtime.c: Likewise.
1410         * intrinsics/env.c: Likewise.
1411         * intrinsics/eoshift0.c: Likewise.
1412         * intrinsics/eoshift2.c: Likewise.
1413         * intrinsics/erfc_scaled.c: Likewise.
1414         * intrinsics/erfc_scaled_inc.c: Likewise.
1415         * intrinsics/etime.c: Likewise.
1416         * intrinsics/exit.c: Likewise.
1417         * intrinsics/f2c_specifics.F90: Likewise.
1418         * intrinsics/fnum.c: Likewise.
1419         * intrinsics/gerror.c: Likewise.
1420         * intrinsics/getXid.c: Likewise.
1421         * intrinsics/getcwd.c: Likewise.
1422         * intrinsics/getlog.c: Likewise.
1423         * intrinsics/hostnm.c: Likewise.
1424         * intrinsics/ierrno.c: Likewise.
1425         * intrinsics/ishftc.c: Likewise.
1426         * intrinsics/iso_c_binding.c: Likewise.
1427         * intrinsics/iso_c_binding.h: Likewise.
1428         * intrinsics/iso_c_generated_procs.c: Likewise.
1429         * intrinsics/kill.c: Likewise.
1430         * intrinsics/link.c: Likewise.
1431         * intrinsics/malloc.c: Likewise.
1432         * intrinsics/move_alloc.c: Likewise.
1433         * intrinsics/mvbits.c: Likewise.
1434         * intrinsics/pack_generic.c: Likewise.
1435         * intrinsics/perror.c: Likewise.
1436         * intrinsics/rand.c: Likewise.
1437         * intrinsics/random.c: Likewise.
1438         * intrinsics/rename.c: Likewise.
1439         * intrinsics/reshape_generic.c: Likewise.
1440         * intrinsics/reshape_packed.c: Likewise.
1441         * intrinsics/selected_char_kind.c: Likewise.
1442         * intrinsics/selected_int_kind.f90: Likewise.
1443         * intrinsics/selected_real_kind.f90: Likewise.
1444         * intrinsics/signal.c: Likewise.
1445         * intrinsics/size.c: Likewise.
1446         * intrinsics/sleep.c: Likewise.
1447         * intrinsics/spread_generic.c: Likewise.
1448         * intrinsics/stat.c: Likewise.
1449         * intrinsics/string_intrinsics.c: Likewise.
1450         * intrinsics/string_intrinsics_inc.c: Likewise.
1451         * intrinsics/symlnk.c: Likewise.
1452         * intrinsics/system.c: Likewise.
1453         * intrinsics/system_clock.c: Likewise.
1454         * intrinsics/time.c: Likewise.
1455         * intrinsics/time_1.h: Likewise.
1456         * intrinsics/transpose_generic.c: Likewise.
1457         * intrinsics/umask.c: Likewise.
1458         * intrinsics/unlink.c: Likewise.
1459         * intrinsics/unpack_generic.c: Likewise.
1460         * io/close.c: Likewise.
1461         * io/fbuf.c: Likewise.
1462         * io/file_pos.c: Likewise.
1463         * io/format.c: Likewise.
1464         * io/inquire.c: Likewise.
1465         * io/intrinsics.c: Likewise.
1466         * io/io.h: Likewise.
1467         * io/list_read.c: Likewise.
1468         * io/lock.c: Likewise.
1469         * io/open.c: Likewise.
1470         * io/read.c: Likewise.
1471         * io/size_from_kind.c: Likewise.
1472         * io/transfer.c: Likewise.
1473         * io/unit.c: Likewise.
1474         * io/unix.c: Likewise.
1475         * io/write.c: Likewise.
1476         * io/write_float.def: Likewise.
1477         * libgfortran.h: Likewise.
1478         * m4/all.m4: Likewise.
1479         * m4/any.m4: Likewise.
1480         * m4/count.m4: Likewise.
1481         * m4/cshift1.m4: Likewise.
1482         * m4/eoshift1.m4: Likewise.
1483         * m4/eoshift3.m4: Likewise.
1484         * m4/exponent.m4: Likewise.
1485         * m4/fraction.m4: Likewise.
1486         * m4/head.m4: Likewise.
1487         * m4/in_pack.m4: Likewise.
1488         * m4/in_unpack.m4: Likewise.
1489         * m4/matmul.m4: Likewise.
1490         * m4/matmull.m4: Likewise.
1491         * m4/maxloc0.m4: Likewise.
1492         * m4/maxloc1.m4: Likewise.
1493         * m4/maxval.m4: Likewise.
1494         * m4/minloc0.m4: Likewise.
1495         * m4/minloc1.m4: Likewise.
1496         * m4/minval.m4: Likewise.
1497         * m4/nearest.m4: Likewise.
1498         * m4/pack.m4: Likewise.
1499         * m4/pow.m4: Likewise.
1500         * m4/product.m4: Likewise.
1501         * m4/reshape.m4: Likewise.
1502         * m4/rrspacing.m4: Likewise.
1503         * m4/set_exponent.m4: Likewise.
1504         * m4/shape.m4: Likewise.
1505         * m4/spacing.m4: Likewise.
1506         * m4/spread.m4: Likewise.
1507         * m4/sum.m4: Likewise.
1508         * m4/transpose.m4: Likewise.
1509         * m4/unpack.m4: Likewise.
1510         * runtime/backtrace.c: Likewise.
1511         * runtime/compile_options.c: Likewise.
1512         * runtime/convert_char.c: Likewise.
1513         * runtime/environ.c: Likewise.
1514         * runtime/error.c: Likewise.
1515         * runtime/in_pack_generic.c: Likewise.
1516         * runtime/in_unpack_generic.c: Likewise.
1517         * runtime/main.c: Likewise.
1518         * runtime/memory.c: Likewise.
1519         * runtime/pause.c: Likewise.
1520         * runtime/select.c: Likewise.
1521         * runtime/select_inc.c: Likewise.
1522         * runtime/stop.c: Likewise.
1523         * runtime/string.c: Likewise.
1524         * generated/_abs_c10.F90: Regenerate.
1525         * generated/_abs_c16.F90: Regenerate.
1526         * generated/_abs_c4.F90: Regenerate.
1527         * generated/_abs_c8.F90: Regenerate.
1528         * generated/_abs_i16.F90: Regenerate.
1529         * generated/_abs_i4.F90: Regenerate.
1530         * generated/_abs_i8.F90: Regenerate.
1531         * generated/_abs_r10.F90: Regenerate.
1532         * generated/_abs_r16.F90: Regenerate.
1533         * generated/_abs_r4.F90: Regenerate.
1534         * generated/_abs_r8.F90: Regenerate.
1535         * generated/_acos_r10.F90: Regenerate.
1536         * generated/_acos_r16.F90: Regenerate.
1537         * generated/_acos_r4.F90: Regenerate.
1538         * generated/_acos_r8.F90: Regenerate.
1539         * generated/_acosh_r10.F90: Regenerate.
1540         * generated/_acosh_r16.F90: Regenerate.
1541         * generated/_acosh_r4.F90: Regenerate.
1542         * generated/_acosh_r8.F90: Regenerate.
1543         * generated/_aimag_c10.F90: Regenerate.
1544         * generated/_aimag_c16.F90: Regenerate.
1545         * generated/_aimag_c4.F90: Regenerate.
1546         * generated/_aimag_c8.F90: Regenerate.
1547         * generated/_aint_r10.F90: Regenerate.
1548         * generated/_aint_r16.F90: Regenerate.
1549         * generated/_aint_r4.F90: Regenerate.
1550         * generated/_aint_r8.F90: Regenerate.
1551         * generated/_anint_r10.F90: Regenerate.
1552         * generated/_anint_r16.F90: Regenerate.
1553         * generated/_anint_r4.F90: Regenerate.
1554         * generated/_anint_r8.F90: Regenerate.
1555         * generated/_asin_r10.F90: Regenerate.
1556         * generated/_asin_r16.F90: Regenerate.
1557         * generated/_asin_r4.F90: Regenerate.
1558         * generated/_asin_r8.F90: Regenerate.
1559         * generated/_asinh_r10.F90: Regenerate.
1560         * generated/_asinh_r16.F90: Regenerate.
1561         * generated/_asinh_r4.F90: Regenerate.
1562         * generated/_asinh_r8.F90: Regenerate.
1563         * generated/_atan2_r10.F90: Regenerate.
1564         * generated/_atan2_r16.F90: Regenerate.
1565         * generated/_atan2_r4.F90: Regenerate.
1566         * generated/_atan2_r8.F90: Regenerate.
1567         * generated/_atan_r10.F90: Regenerate.
1568         * generated/_atan_r16.F90: Regenerate.
1569         * generated/_atan_r4.F90: Regenerate.
1570         * generated/_atan_r8.F90: Regenerate.
1571         * generated/_atanh_r10.F90: Regenerate.
1572         * generated/_atanh_r16.F90: Regenerate.
1573         * generated/_atanh_r4.F90: Regenerate.
1574         * generated/_atanh_r8.F90: Regenerate.
1575         * generated/_conjg_c10.F90: Regenerate.
1576         * generated/_conjg_c16.F90: Regenerate.
1577         * generated/_conjg_c4.F90: Regenerate.
1578         * generated/_conjg_c8.F90: Regenerate.
1579         * generated/_cos_c10.F90: Regenerate.
1580         * generated/_cos_c16.F90: Regenerate.
1581         * generated/_cos_c4.F90: Regenerate.
1582         * generated/_cos_c8.F90: Regenerate.
1583         * generated/_cos_r10.F90: Regenerate.
1584         * generated/_cos_r16.F90: Regenerate.
1585         * generated/_cos_r4.F90: Regenerate.
1586         * generated/_cos_r8.F90: Regenerate.
1587         * generated/_cosh_r10.F90: Regenerate.
1588         * generated/_cosh_r16.F90: Regenerate.
1589         * generated/_cosh_r4.F90: Regenerate.
1590         * generated/_cosh_r8.F90: Regenerate.
1591         * generated/_dim_i16.F90: Regenerate.
1592         * generated/_dim_i4.F90: Regenerate.
1593         * generated/_dim_i8.F90: Regenerate.
1594         * generated/_dim_r10.F90: Regenerate.
1595         * generated/_dim_r16.F90: Regenerate.
1596         * generated/_dim_r4.F90: Regenerate.
1597         * generated/_dim_r8.F90: Regenerate.
1598         * generated/_exp_c10.F90: Regenerate.
1599         * generated/_exp_c16.F90: Regenerate.
1600         * generated/_exp_c4.F90: Regenerate.
1601         * generated/_exp_c8.F90: Regenerate.
1602         * generated/_exp_r10.F90: Regenerate.
1603         * generated/_exp_r16.F90: Regenerate.
1604         * generated/_exp_r4.F90: Regenerate.
1605         * generated/_exp_r8.F90: Regenerate.
1606         * generated/_log10_r10.F90: Regenerate.
1607         * generated/_log10_r16.F90: Regenerate.
1608         * generated/_log10_r4.F90: Regenerate.
1609         * generated/_log10_r8.F90: Regenerate.
1610         * generated/_log_c10.F90: Regenerate.
1611         * generated/_log_c16.F90: Regenerate.
1612         * generated/_log_c4.F90: Regenerate.
1613         * generated/_log_c8.F90: Regenerate.
1614         * generated/_log_r10.F90: Regenerate.
1615         * generated/_log_r16.F90: Regenerate.
1616         * generated/_log_r4.F90: Regenerate.
1617         * generated/_log_r8.F90: Regenerate.
1618         * generated/_mod_i16.F90: Regenerate.
1619         * generated/_mod_i4.F90: Regenerate.
1620         * generated/_mod_i8.F90: Regenerate.
1621         * generated/_mod_r10.F90: Regenerate.
1622         * generated/_mod_r16.F90: Regenerate.
1623         * generated/_mod_r4.F90: Regenerate.
1624         * generated/_mod_r8.F90: Regenerate.
1625         * generated/_sign_i16.F90: Regenerate.
1626         * generated/_sign_i4.F90: Regenerate.
1627         * generated/_sign_i8.F90: Regenerate.
1628         * generated/_sign_r10.F90: Regenerate.
1629         * generated/_sign_r16.F90: Regenerate.
1630         * generated/_sign_r4.F90: Regenerate.
1631         * generated/_sign_r8.F90: Regenerate.
1632         * generated/_sin_c10.F90: Regenerate.
1633         * generated/_sin_c16.F90: Regenerate.
1634         * generated/_sin_c4.F90: Regenerate.
1635         * generated/_sin_c8.F90: Regenerate.
1636         * generated/_sin_r10.F90: Regenerate.
1637         * generated/_sin_r16.F90: Regenerate.
1638         * generated/_sin_r4.F90: Regenerate.
1639         * generated/_sin_r8.F90: Regenerate.
1640         * generated/_sinh_r10.F90: Regenerate.
1641         * generated/_sinh_r16.F90: Regenerate.
1642         * generated/_sinh_r4.F90: Regenerate.
1643         * generated/_sinh_r8.F90: Regenerate.
1644         * generated/_sqrt_c10.F90: Regenerate.
1645         * generated/_sqrt_c16.F90: Regenerate.
1646         * generated/_sqrt_c4.F90: Regenerate.
1647         * generated/_sqrt_c8.F90: Regenerate.
1648         * generated/_sqrt_r10.F90: Regenerate.
1649         * generated/_sqrt_r16.F90: Regenerate.
1650         * generated/_sqrt_r4.F90: Regenerate.
1651         * generated/_sqrt_r8.F90: Regenerate.
1652         * generated/_tan_r10.F90: Regenerate.
1653         * generated/_tan_r16.F90: Regenerate.
1654         * generated/_tan_r4.F90: Regenerate.
1655         * generated/_tan_r8.F90: Regenerate.
1656         * generated/_tanh_r10.F90: Regenerate.
1657         * generated/_tanh_r16.F90: Regenerate.
1658         * generated/_tanh_r4.F90: Regenerate.
1659         * generated/_tanh_r8.F90: Regenerate.
1660         * generated/all_l1.c: Regenerate.
1661         * generated/all_l16.c: Regenerate.
1662         * generated/all_l2.c: Regenerate.
1663         * generated/all_l4.c: Regenerate.
1664         * generated/all_l8.c: Regenerate.
1665         * generated/any_l1.c: Regenerate.
1666         * generated/any_l16.c: Regenerate.
1667         * generated/any_l2.c: Regenerate.
1668         * generated/any_l4.c: Regenerate.
1669         * generated/any_l8.c: Regenerate.
1670         * generated/count_16_l.c: Regenerate.
1671         * generated/count_1_l.c: Regenerate.
1672         * generated/count_2_l.c: Regenerate.
1673         * generated/count_4_l.c: Regenerate.
1674         * generated/count_8_l.c: Regenerate.
1675         * generated/cshift0_c10.c: Regenerate.
1676         * generated/cshift0_c16.c: Regenerate.
1677         * generated/cshift0_c4.c: Regenerate.
1678         * generated/cshift0_c8.c: Regenerate.
1679         * generated/cshift0_i1.c: Regenerate.
1680         * generated/cshift0_i16.c: Regenerate.
1681         * generated/cshift0_i2.c: Regenerate.
1682         * generated/cshift0_i4.c: Regenerate.
1683         * generated/cshift0_i8.c: Regenerate.
1684         * generated/cshift0_r10.c: Regenerate.
1685         * generated/cshift0_r16.c: Regenerate.
1686         * generated/cshift0_r4.c: Regenerate.
1687         * generated/cshift0_r8.c: Regenerate.
1688         * generated/cshift1_16.c: Regenerate.
1689         * generated/cshift1_4.c: Regenerate.
1690         * generated/cshift1_8.c: Regenerate.
1691         * generated/eoshift1_16.c: Regenerate.
1692         * generated/eoshift1_4.c: Regenerate.
1693         * generated/eoshift1_8.c: Regenerate.
1694         * generated/eoshift3_16.c: Regenerate.
1695         * generated/eoshift3_4.c: Regenerate.
1696         * generated/eoshift3_8.c: Regenerate.
1697         * generated/exponent_r10.c: Regenerate.
1698         * generated/exponent_r16.c: Regenerate.
1699         * generated/exponent_r4.c: Regenerate.
1700         * generated/exponent_r8.c: Regenerate.
1701         * generated/fraction_r10.c: Regenerate.
1702         * generated/fraction_r16.c: Regenerate.
1703         * generated/fraction_r4.c: Regenerate.
1704         * generated/fraction_r8.c: Regenerate.
1705         * generated/in_pack_c10.c: Regenerate.
1706         * generated/in_pack_c16.c: Regenerate.
1707         * generated/in_pack_c4.c: Regenerate.
1708         * generated/in_pack_c8.c: Regenerate.
1709         * generated/in_pack_i1.c: Regenerate.
1710         * generated/in_pack_i16.c: Regenerate.
1711         * generated/in_pack_i2.c: Regenerate.
1712         * generated/in_pack_i4.c: Regenerate.
1713         * generated/in_pack_i8.c: Regenerate.
1714         * generated/in_pack_r10.c: Regenerate.
1715         * generated/in_pack_r16.c: Regenerate.
1716         * generated/in_pack_r4.c: Regenerate.
1717         * generated/in_pack_r8.c: Regenerate.
1718         * generated/in_unpack_c10.c: Regenerate.
1719         * generated/in_unpack_c16.c: Regenerate.
1720         * generated/in_unpack_c4.c: Regenerate.
1721         * generated/in_unpack_c8.c: Regenerate.
1722         * generated/in_unpack_i1.c: Regenerate.
1723         * generated/in_unpack_i16.c: Regenerate.
1724         * generated/in_unpack_i2.c: Regenerate.
1725         * generated/in_unpack_i4.c: Regenerate.
1726         * generated/in_unpack_i8.c: Regenerate.
1727         * generated/in_unpack_r10.c: Regenerate.
1728         * generated/in_unpack_r16.c: Regenerate.
1729         * generated/in_unpack_r4.c: Regenerate.
1730         * generated/in_unpack_r8.c: Regenerate.
1731         * generated/matmul_c10.c: Regenerate.
1732         * generated/matmul_c16.c: Regenerate.
1733         * generated/matmul_c4.c: Regenerate.
1734         * generated/matmul_c8.c: Regenerate.
1735         * generated/matmul_i1.c: Regenerate.
1736         * generated/matmul_i16.c: Regenerate.
1737         * generated/matmul_i2.c: Regenerate.
1738         * generated/matmul_i4.c: Regenerate.
1739         * generated/matmul_i8.c: Regenerate.
1740         * generated/matmul_l16.c: Regenerate.
1741         * generated/matmul_l4.c: Regenerate.
1742         * generated/matmul_l8.c: Regenerate.
1743         * generated/matmul_r10.c: Regenerate.
1744         * generated/matmul_r16.c: Regenerate.
1745         * generated/matmul_r4.c: Regenerate.
1746         * generated/matmul_r8.c: Regenerate.
1747         * generated/maxloc0_16_i1.c: Regenerate.
1748         * generated/maxloc0_16_i16.c: Regenerate.
1749         * generated/maxloc0_16_i2.c: Regenerate.
1750         * generated/maxloc0_16_i4.c: Regenerate.
1751         * generated/maxloc0_16_i8.c: Regenerate.
1752         * generated/maxloc0_16_r10.c: Regenerate.
1753         * generated/maxloc0_16_r16.c: Regenerate.
1754         * generated/maxloc0_16_r4.c: Regenerate.
1755         * generated/maxloc0_16_r8.c: Regenerate.
1756         * generated/maxloc0_4_i1.c: Regenerate.
1757         * generated/maxloc0_4_i16.c: Regenerate.
1758         * generated/maxloc0_4_i2.c: Regenerate.
1759         * generated/maxloc0_4_i4.c: Regenerate.
1760         * generated/maxloc0_4_i8.c: Regenerate.
1761         * generated/maxloc0_4_r10.c: Regenerate.
1762         * generated/maxloc0_4_r16.c: Regenerate.
1763         * generated/maxloc0_4_r4.c: Regenerate.
1764         * generated/maxloc0_4_r8.c: Regenerate.
1765         * generated/maxloc0_8_i1.c: Regenerate.
1766         * generated/maxloc0_8_i16.c: Regenerate.
1767         * generated/maxloc0_8_i2.c: Regenerate.
1768         * generated/maxloc0_8_i4.c: Regenerate.
1769         * generated/maxloc0_8_i8.c: Regenerate.
1770         * generated/maxloc0_8_r10.c: Regenerate.
1771         * generated/maxloc0_8_r16.c: Regenerate.
1772         * generated/maxloc0_8_r4.c: Regenerate.
1773         * generated/maxloc0_8_r8.c: Regenerate.
1774         * generated/maxloc1_16_i1.c: Regenerate.
1775         * generated/maxloc1_16_i16.c: Regenerate.
1776         * generated/maxloc1_16_i2.c: Regenerate.
1777         * generated/maxloc1_16_i4.c: Regenerate.
1778         * generated/maxloc1_16_i8.c: Regenerate.
1779         * generated/maxloc1_16_r10.c: Regenerate.
1780         * generated/maxloc1_16_r16.c: Regenerate.
1781         * generated/maxloc1_16_r4.c: Regenerate.
1782         * generated/maxloc1_16_r8.c: Regenerate.
1783         * generated/maxloc1_4_i1.c: Regenerate.
1784         * generated/maxloc1_4_i16.c: Regenerate.
1785         * generated/maxloc1_4_i2.c: Regenerate.
1786         * generated/maxloc1_4_i4.c: Regenerate.
1787         * generated/maxloc1_4_i8.c: Regenerate.
1788         * generated/maxloc1_4_r10.c: Regenerate.
1789         * generated/maxloc1_4_r16.c: Regenerate.
1790         * generated/maxloc1_4_r4.c: Regenerate.
1791         * generated/maxloc1_4_r8.c: Regenerate.
1792         * generated/maxloc1_8_i1.c: Regenerate.
1793         * generated/maxloc1_8_i16.c: Regenerate.
1794         * generated/maxloc1_8_i2.c: Regenerate.
1795         * generated/maxloc1_8_i4.c: Regenerate.
1796         * generated/maxloc1_8_i8.c: Regenerate.
1797         * generated/maxloc1_8_r10.c: Regenerate.
1798         * generated/maxloc1_8_r16.c: Regenerate.
1799         * generated/maxloc1_8_r4.c: Regenerate.
1800         * generated/maxloc1_8_r8.c: Regenerate.
1801         * generated/maxval_i1.c: Regenerate.
1802         * generated/maxval_i16.c: Regenerate.
1803         * generated/maxval_i2.c: Regenerate.
1804         * generated/maxval_i4.c: Regenerate.
1805         * generated/maxval_i8.c: Regenerate.
1806         * generated/maxval_r10.c: Regenerate.
1807         * generated/maxval_r16.c: Regenerate.
1808         * generated/maxval_r4.c: Regenerate.
1809         * generated/maxval_r8.c: Regenerate.
1810         * generated/minloc0_16_i1.c: Regenerate.
1811         * generated/minloc0_16_i16.c: Regenerate.
1812         * generated/minloc0_16_i2.c: Regenerate.
1813         * generated/minloc0_16_i4.c: Regenerate.
1814         * generated/minloc0_16_i8.c: Regenerate.
1815         * generated/minloc0_16_r10.c: Regenerate.
1816         * generated/minloc0_16_r16.c: Regenerate.
1817         * generated/minloc0_16_r4.c: Regenerate.
1818         * generated/minloc0_16_r8.c: Regenerate.
1819         * generated/minloc0_4_i1.c: Regenerate.
1820         * generated/minloc0_4_i16.c: Regenerate.
1821         * generated/minloc0_4_i2.c: Regenerate.
1822         * generated/minloc0_4_i4.c: Regenerate.
1823         * generated/minloc0_4_i8.c: Regenerate.
1824         * generated/minloc0_4_r10.c: Regenerate.
1825         * generated/minloc0_4_r16.c: Regenerate.
1826         * generated/minloc0_4_r4.c: Regenerate.
1827         * generated/minloc0_4_r8.c: Regenerate.
1828         * generated/minloc0_8_i1.c: Regenerate.
1829         * generated/minloc0_8_i16.c: Regenerate.
1830         * generated/minloc0_8_i2.c: Regenerate.
1831         * generated/minloc0_8_i4.c: Regenerate.
1832         * generated/minloc0_8_i8.c: Regenerate.
1833         * generated/minloc0_8_r10.c: Regenerate.
1834         * generated/minloc0_8_r16.c: Regenerate.
1835         * generated/minloc0_8_r4.c: Regenerate.
1836         * generated/minloc0_8_r8.c: Regenerate.
1837         * generated/minloc1_16_i1.c: Regenerate.
1838         * generated/minloc1_16_i16.c: Regenerate.
1839         * generated/minloc1_16_i2.c: Regenerate.
1840         * generated/minloc1_16_i4.c: Regenerate.
1841         * generated/minloc1_16_i8.c: Regenerate.
1842         * generated/minloc1_16_r10.c: Regenerate.
1843         * generated/minloc1_16_r16.c: Regenerate.
1844         * generated/minloc1_16_r4.c: Regenerate.
1845         * generated/minloc1_16_r8.c: Regenerate.
1846         * generated/minloc1_4_i1.c: Regenerate.
1847         * generated/minloc1_4_i16.c: Regenerate.
1848         * generated/minloc1_4_i2.c: Regenerate.
1849         * generated/minloc1_4_i4.c: Regenerate.
1850         * generated/minloc1_4_i8.c: Regenerate.
1851         * generated/minloc1_4_r10.c: Regenerate.
1852         * generated/minloc1_4_r16.c: Regenerate.
1853         * generated/minloc1_4_r4.c: Regenerate.
1854         * generated/minloc1_4_r8.c: Regenerate.
1855         * generated/minloc1_8_i1.c: Regenerate.
1856         * generated/minloc1_8_i16.c: Regenerate.
1857         * generated/minloc1_8_i2.c: Regenerate.
1858         * generated/minloc1_8_i4.c: Regenerate.
1859         * generated/minloc1_8_i8.c: Regenerate.
1860         * generated/minloc1_8_r10.c: Regenerate.
1861         * generated/minloc1_8_r16.c: Regenerate.
1862         * generated/minloc1_8_r4.c: Regenerate.
1863         * generated/minloc1_8_r8.c: Regenerate.
1864         * generated/minval_i1.c: Regenerate.
1865         * generated/minval_i16.c: Regenerate.
1866         * generated/minval_i2.c: Regenerate.
1867         * generated/minval_i4.c: Regenerate.
1868         * generated/minval_i8.c: Regenerate.
1869         * generated/minval_r10.c: Regenerate.
1870         * generated/minval_r16.c: Regenerate.
1871         * generated/minval_r4.c: Regenerate.
1872         * generated/minval_r8.c: Regenerate.
1873         * generated/misc_specifics.F90: Regenerate.
1874         * generated/nearest_r10.c: Regenerate.
1875         * generated/nearest_r16.c: Regenerate.
1876         * generated/nearest_r4.c: Regenerate.
1877         * generated/nearest_r8.c: Regenerate.
1878         * generated/pack_c10.c: Regenerate.
1879         * generated/pack_c16.c: Regenerate.
1880         * generated/pack_c4.c: Regenerate.
1881         * generated/pack_c8.c: Regenerate.
1882         * generated/pack_i1.c: Regenerate.
1883         * generated/pack_i16.c: Regenerate.
1884         * generated/pack_i2.c: Regenerate.
1885         * generated/pack_i4.c: Regenerate.
1886         * generated/pack_i8.c: Regenerate.
1887         * generated/pack_r10.c: Regenerate.
1888         * generated/pack_r16.c: Regenerate.
1889         * generated/pack_r4.c: Regenerate.
1890         * generated/pack_r8.c: Regenerate.
1891         * generated/pow_c10_i16.c: Regenerate.
1892         * generated/pow_c10_i4.c: Regenerate.
1893         * generated/pow_c10_i8.c: Regenerate.
1894         * generated/pow_c16_i16.c: Regenerate.
1895         * generated/pow_c16_i4.c: Regenerate.
1896         * generated/pow_c16_i8.c: Regenerate.
1897         * generated/pow_c4_i16.c: Regenerate.
1898         * generated/pow_c4_i4.c: Regenerate.
1899         * generated/pow_c4_i8.c: Regenerate.
1900         * generated/pow_c8_i16.c: Regenerate.
1901         * generated/pow_c8_i4.c: Regenerate.
1902         * generated/pow_c8_i8.c: Regenerate.
1903         * generated/pow_i16_i16.c: Regenerate.
1904         * generated/pow_i16_i4.c: Regenerate.
1905         * generated/pow_i16_i8.c: Regenerate.
1906         * generated/pow_i4_i16.c: Regenerate.
1907         * generated/pow_i4_i4.c: Regenerate.
1908         * generated/pow_i4_i8.c: Regenerate.
1909         * generated/pow_i8_i16.c: Regenerate.
1910         * generated/pow_i8_i4.c: Regenerate.
1911         * generated/pow_i8_i8.c: Regenerate.
1912         * generated/pow_r10_i16.c: Regenerate.
1913         * generated/pow_r10_i8.c: Regenerate.
1914         * generated/pow_r16_i16.c: Regenerate.
1915         * generated/pow_r16_i8.c: Regenerate.
1916         * generated/pow_r4_i16.c: Regenerate.
1917         * generated/pow_r4_i8.c: Regenerate.
1918         * generated/pow_r8_i16.c: Regenerate.
1919         * generated/pow_r8_i8.c: Regenerate.
1920         * generated/product_c10.c: Regenerate.
1921         * generated/product_c16.c: Regenerate.
1922         * generated/product_c4.c: Regenerate.
1923         * generated/product_c8.c: Regenerate.
1924         * generated/product_i1.c: Regenerate.
1925         * generated/product_i16.c: Regenerate.
1926         * generated/product_i2.c: Regenerate.
1927         * generated/product_i4.c: Regenerate.
1928         * generated/product_i8.c: Regenerate.
1929         * generated/product_r10.c: Regenerate.
1930         * generated/product_r16.c: Regenerate.
1931         * generated/product_r4.c: Regenerate.
1932         * generated/product_r8.c: Regenerate.
1933         * generated/reshape_c10.c: Regenerate.
1934         * generated/reshape_c16.c: Regenerate.
1935         * generated/reshape_c4.c: Regenerate.
1936         * generated/reshape_c8.c: Regenerate.
1937         * generated/reshape_i16.c: Regenerate.
1938         * generated/reshape_i4.c: Regenerate.
1939         * generated/reshape_i8.c: Regenerate.
1940         * generated/reshape_r10.c: Regenerate.
1941         * generated/reshape_r16.c: Regenerate.
1942         * generated/reshape_r4.c: Regenerate.
1943         * generated/reshape_r8.c: Regenerate.
1944         * generated/rrspacing_r10.c: Regenerate.
1945         * generated/rrspacing_r16.c: Regenerate.
1946         * generated/rrspacing_r4.c: Regenerate.
1947         * generated/rrspacing_r8.c: Regenerate.
1948         * generated/set_exponent_r10.c: Regenerate.
1949         * generated/set_exponent_r16.c: Regenerate.
1950         * generated/set_exponent_r4.c: Regenerate.
1951         * generated/set_exponent_r8.c: Regenerate.
1952         * generated/shape_i16.c: Regenerate.
1953         * generated/shape_i4.c: Regenerate.
1954         * generated/shape_i8.c: Regenerate.
1955         * generated/spacing_r10.c: Regenerate.
1956         * generated/spacing_r16.c: Regenerate.
1957         * generated/spacing_r4.c: Regenerate.
1958         * generated/spacing_r8.c: Regenerate.
1959         * generated/spread_c10.c: Regenerate.
1960         * generated/spread_c16.c: Regenerate.
1961         * generated/spread_c4.c: Regenerate.
1962         * generated/spread_c8.c: Regenerate.
1963         * generated/spread_i1.c: Regenerate.
1964         * generated/spread_i16.c: Regenerate.
1965         * generated/spread_i2.c: Regenerate.
1966         * generated/spread_i4.c: Regenerate.
1967         * generated/spread_i8.c: Regenerate.
1968         * generated/spread_r10.c: Regenerate.
1969         * generated/spread_r16.c: Regenerate.
1970         * generated/spread_r4.c: Regenerate.
1971         * generated/spread_r8.c: Regenerate.
1972         * generated/sum_c10.c: Regenerate.
1973         * generated/sum_c16.c: Regenerate.
1974         * generated/sum_c4.c: Regenerate.
1975         * generated/sum_c8.c: Regenerate.
1976         * generated/sum_i1.c: Regenerate.
1977         * generated/sum_i16.c: Regenerate.
1978         * generated/sum_i2.c: Regenerate.
1979         * generated/sum_i4.c: Regenerate.
1980         * generated/sum_i8.c: Regenerate.
1981         * generated/sum_r10.c: Regenerate.
1982         * generated/sum_r16.c: Regenerate.
1983         * generated/sum_r4.c: Regenerate.
1984         * generated/sum_r8.c: Regenerate.
1985         * generated/transpose_c10.c: Regenerate.
1986         * generated/transpose_c16.c: Regenerate.
1987         * generated/transpose_c4.c: Regenerate.
1988         * generated/transpose_c8.c: Regenerate.
1989         * generated/transpose_i16.c: Regenerate.
1990         * generated/transpose_i4.c: Regenerate.
1991         * generated/transpose_i8.c: Regenerate.
1992         * generated/transpose_r10.c: Regenerate.
1993         * generated/transpose_r16.c: Regenerate.
1994         * generated/transpose_r4.c: Regenerate.
1995         * generated/transpose_r8.c: Regenerate.
1996         * generated/unpack_c10.c: Regenerate.
1997         * generated/unpack_c16.c: Regenerate.
1998         * generated/unpack_c4.c: Regenerate.
1999         * generated/unpack_c8.c: Regenerate.
2000         * generated/unpack_i1.c: Regenerate.
2001         * generated/unpack_i16.c: Regenerate.
2002         * generated/unpack_i2.c: Regenerate.
2003         * generated/unpack_i4.c: Regenerate.
2004         * generated/unpack_i8.c: Regenerate.
2005         * generated/unpack_r10.c: Regenerate.
2006         * generated/unpack_r16.c: Regenerate.
2007         * generated/unpack_r4.c: Regenerate.
2008         * generated/unpack_r8.c: Regenerate.
2009
2010 2009-04-08  Janne Blomqvist  <jb@gcc.gnu.org>
2011
2012         * io/open.c (already_open): Test for POSIX close return value.
2013         * io/unit.c (close_unit_1): Likewise.
2014         * io/unix.c (raw_close): Return 0 for success for preconnected units.
2015
2016 2009-04-08  Janne Blomqvist  <jb@gcc.gnu.org>
2017
2018         * runtime/string.c (compare0): Use gfc_charlen_type.
2019         * runtime/error.c (gfc_itoa): Move to io/write.c
2020         (xtoa): Rename to gfc_xtoa.
2021         * runtime/backtrace.c (show_backtrace): Call gfc_xtoa.
2022         * intrinsics/cshift0.c (cshift0): Use index_type for shift arg.
2023         * intrinsics/date_and_time.c (date_and_time): Use index_type.
2024         (itime_i4): Likewise.
2025         (itime_i8): Likewise.
2026         (idate_i4): Likewise.
2027         (idate_i8): Likewise.
2028         (gmtime_i4): Likewise.
2029         (gmtime_i8): Likewise.
2030         (ltime_i4): Likewise.
2031         (ltime_i8): Likewise.
2032         * libgfortran.h (gfc_itoa): Remove prototype.
2033         (xtoa): Rename prototype to gfc_xtoa.
2034         * io/list_read.c (nml_read_obj): Use size_t for string length.
2035         * io/transfer.c (read_block_direct): Change nbytes arg from
2036         pointer to value.
2037         (unformatted_read): Minor cleanup, call read_block_directly properly.
2038         (skip_record): Use ssize_t.
2039         (next_record_w_unf): Avoid stell() call by calling sseek with SEEK_CUR.
2040         (iolength_transfer): Make sure to multiply before cast.
2041         * io/intrinsics.c (fgetc): Remove unnecessary variable.
2042         * io/format.c (format_hash): Use gfc_charlen_type.
2043         * io/write.c (itoa): Move from runtime/error.c:gfc_itoa, rename,
2044         make static.
2045         (write_i): Call with pointer to itoa.
2046         (write_z): Call with pointer to gfc_xtoa.
2047         (write_integer): Pointer to itoa.
2048         (nml_write_obj): Type cleanup, don't call strlen in loop.
2049
2050 2009-04-06  H.J. Lu  <hongjiu.lu@intel.com>
2051
2052         PR libgfortran/39664
2053         * io/unix.c (raw_close): Don't close STDOUT_FILENO,
2054         STDERR_FILENO nor STDIN_FILENO.
2055
2056 2009-04-06  David Edelsohn  <edelsohn@gnu.org>
2057
2058         * io/io.h (struct stream): Rename truncate to trunc.
2059         (struncate): Same.
2060         * io/unix.c (raw_init): Rename truncate to trunc.
2061         (buf_init): Same.
2062         (open_internal): Same.
2063
2064 2009-04-05  Daniel Kraft  <d@domob.eu>
2065
2066         PR fortran/38654
2067         * io/read.c (read_f): Reworked to speed up floating point parsing.
2068         (convert_real): Use pointer-casting instead of memcpy and temporaries.
2069
2070 2009-04-05  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2071
2072         PR libfortran/37754
2073         * io/io.h (format_hash_entry): New structure for hash table.
2074         (format_hash_table): The hash table itself.
2075         (free_format_data): Revise function prototype.
2076         (free_format_hash_table, init_format_hash,
2077         free_format_hash): New function prototypes.
2078         * io/unit.c (close_unit_1): Use free_format_hash_table.
2079         * io/transfer.c (st_read_done, st_write_done): Free format data if
2080         internal unit.
2081         * io/format.c (free_format_hash_table): New function that frees any
2082         memory allocated previously for cached format data.
2083         (reset_node): New static helper function to reset the format counters
2084         for a format node.
2085         (reset_fnode_counters): New static function recursively calls reset_node
2086         to traverse the fnode tree.
2087         (format_hash): New simple hash function based on XOR, probabalistic,
2088         tosses collisions.
2089         (save_parsed_format): New static function to save the parsed format
2090         data to use again.
2091         (find_parsed_format): New static function searches the hash table
2092         looking for a match.
2093         (free_format_data): Revised to accept pointer to format data rather than
2094         the dtp pointer so that the function can be used in more places.
2095         (format_lex): Editorial.
2096         (parse_format_list): Set flag used to determine of format data hashing
2097         is to be used.  Internal units are not persistent enough for this.
2098         (revert): Move to ne location in file.
2099         (parse_format): Use new functions to look for previously parsed
2100         format strings and use them rather than re-parse.  If not found, saves
2101         the parsed format data for later use.
2102
2103 2009-04-05  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2104
2105         PR libfortran/37754
2106         * io/transfer.c (formatted_transfer_scalar): Remove this function by
2107         factoring it into two new functions, one for read and one for write,
2108         eliminating all the conditionals for read or write mode.
2109         (formatted transfer_scalar_read): New function.
2110         (formatted transfer_scalar_write): New function.
2111         (formatted_transfer): Use new functions.
2112
2113 2009-04-05  Janne Blomqvist  <jb@gcc.gnu.org>
2114
2115         PR libfortran/25561 libfortran/37754
2116         * io/io.h (struct stream): Define new stream interface function
2117         pointers, and inline functions for accessing it.
2118         (struct fbuf): Use int instead of size_t, remove flushed element.
2119         (mem_alloc_w): New prototype.
2120         (mem_alloc_r): New prototype.
2121         (stream_at_bof): Remove prototype.
2122         (stream_at_eof): Remove prototype.
2123         (file_position): Remove prototype.
2124         (flush): Remove prototype.
2125         (stream_offset): Remove prototype.
2126         (unit_truncate): New prototype.
2127         (read_block_form): Change to return pointer, int* argument.
2128         (hit_eof): New prototype.
2129         (fbuf_init): Change prototype.
2130         (fbuf_reset): Change prototype.
2131         (fbuf_alloc): Change prototype.
2132         (fbuf_flush): Change prototype.
2133         (fbuf_seek): Change prototype.
2134         (fbuf_read): New prototype.
2135         (fbuf_getc_refill): New prototype.
2136         (fbuf_getc): New inline function.
2137         * io/fbuf.c (fbuf_init): Use int, get rid of flushed.
2138         (fbuf_debug): New function.
2139         (fbuf_reset): Flush, and return position offset.
2140         (fbuf_alloc): Simplify, don't flush, just realloc.
2141         (fbuf_flush): Make usable for read mode, salvage remaining bytes.
2142         (fbuf_seek): New whence argument.
2143         (fbuf_read): New function.
2144         (fbuf_getc_refill): New function.
2145         * io/file_pos.c (formatted_backspace): Use new stream interface.
2146         (unformatted_backspace): Likewise.
2147         (st_backspace): Make sure format buffer is reset, use new stream
2148         interface, use unit_truncate.
2149         (st_endfile): Likewise.
2150         (st_rewind): Likewise.
2151         * io/intrinsics.c: Use new stream interface.
2152         * io/list_read.c (push_char): Don't use u.p.scratch, use realloc
2153         to resize.
2154         (free_saved): Don't check u.p.scratch.
2155         (next_char): Use new stream interface, use fbuf_getc() for external files.
2156         (finish_list_read): flush format buffer.
2157         (nml_query): Update to use modified interface:s
2158         * io/open.c (test_endfile): Use new stream interface.
2159         (edit_modes): Likewise.
2160         (new_unit): Likewise, set bytes_left to 1 for stream files.
2161         * io/read.c (read_l): Use new read_block_form interface.
2162         (read_utf8): Likewise.
2163         (read_utf8_char1): Likewise.
2164         (read_default_char1): Likewise.
2165         (read_utf8_char4): Likewise.
2166         (read_default_char4): Likewise.
2167         (read_a): Likewise.
2168         (read_a_char4): Likewise.
2169         (read_decimal): Likewise.
2170         (read_radix): Likewise.
2171         (read_f): Likewise.
2172         * io/transfer.c (read_sf): Use fbuf_read and mem_alloc_r, remove
2173         usage of u.p.line_buffer.
2174         (read_block_form): Update interface to return pointer, use
2175         fbuf_read for direct access.
2176         (read_block_direct): Update to new stream interface.
2177         (write_block): Use mem_alloc_w for internal I/O.
2178         (write_buf): Update to new stream interface.
2179         (formatted_transfer_scalar): Don't use u.p.line_buffer, use
2180         fbuf_seek for external files.
2181         (us_read): Update to new stream interface.
2182         (us_write): Likewise.
2183         (data_transfer_init): Always check if we switch modes and flush.
2184         (skip_record): Use new stream interface, fix comparison.
2185         (next_record_r): Check for and reset u.p.at_eof, use new stream
2186         interface, use fbuf_getc for spacing.
2187         (write_us_marker): Update to new stream interface, don't inline.
2188         (next_record_w_unf): Likewise.
2189         (sset): New function.
2190         (next_record_w): Use new stream interface, use fbuf for printing
2191         newline.
2192         (next_record): Use new stream interface.
2193         (finalize_transfer): Remove sfree call, use new stream interface.
2194         (st_iolength_done): Don't use u.p.scratch.
2195         (st_read): Don't check for end of file.
2196         (st_read_done): Don't use u.p.scratch, use unit_truncate.
2197         (hit_eof): New function.
2198         * io/unit.c (init_units): Always init fbuf for formatted units.
2199         (update_position): Use new stream interface.
2200         (unit_truncate): New function.
2201         (finish_last_advance_record): Use fbuf to print newline.
2202         * io/unix.c: Remove unused SSIZE_MAX macro.
2203         (BUFFER_SIZE): Make static const variable rather than macro.
2204         (struct unix_stream): Remove dirty_offset, len, method,
2205         small_buffer. Order elements by decreasing size.
2206         (struct int_stream): Remove.
2207         (move_pos_offset): Remove usage of dirty_offset.
2208         (reset_stream): Remove.
2209         (do_read): Rename to raw_read, update to match new stream
2210         interface.
2211         (do_write): Rename to raw_write, update to new stream interface.
2212         (raw_seek): New function.
2213         (raw_tell): New function.
2214         (raw_truncate): New function.
2215         (raw_close): New function.
2216         (raw_flush): New function.
2217         (raw_init): New function.
2218         (fd_alloc): Remove.
2219         (fd_alloc_r_at): Remove.
2220         (fd_alloc_w_at): Remove.
2221         (fd_sfree): Remove.
2222         (fd_seek): Remove.
2223         (fd_truncate): Remove.
2224         (fd_sset): Remove.
2225         (fd_read): Remove.
2226         (fd_write): Remove.
2227         (fd_close): Remove.
2228         (fd_open): Remove.
2229         (fd_flush): Rename to buf_flush, update to new stream interface
2230         and unix_stream.
2231         (buf_read): New function.
2232         (buf_write): New function.
2233         (buf_seek): New function.
2234         (buf_tell): New function.
2235         (buf_truncate): New function.
2236         (buf_close): New function.
2237         (buf_init): New function.
2238         (mem_alloc_r_at): Rename to mem_alloc_r, change prototype.
2239         (mem_alloc_w_at): Rename to mem_alloc_w, change prototype.
2240         (mem_read): Change to match new stream interface.
2241         (mem_write): Likewise.
2242         (mem_seek): Likewise.
2243         (mem_tell): Likewise.
2244         (mem_truncate): Likewise.
2245         (mem_close): Likewise.
2246         (mem_flush): New function.
2247         (mem_sfree): Remove.
2248         (empty_internal_buffer): Cast to correct type.
2249         (open_internal): Use correct type, init function pointers.
2250         (fd_to_stream): Test whether to open file as buffered or raw.
2251         (output_stream): Remove mode set.
2252         (error_stream): Likewise.
2253         (flush_all_units_1): Use new stream interface.
2254         (flush_all_units): Likewise.
2255         (stream_at_bof): Remove.
2256         (stream_at_eof): Remove.
2257         (file_position): Remove.
2258         (file_length): Update logic to use stream interface.
2259         (flush): Remove.
2260         (stream_offset): Remove.
2261         * io/write.c (write_utf8_char4): Use int instead of size_t.
2262         (write_x): Extra safety check.
2263         (namelist_write_newline): Use new stream interface.
2264
2265 2009-03-29  John David Anglin  <dave.anglin@nrc-cnrc.gc.ca>
2266
2267         PR fortran/33595
2268         * intrinsics/c99_functions.c (round): Use floor instead of ceil.
2269         Revise checks to round up.
2270         (roundf): Likewise.
2271
2272 2009-03-28  Daniel Kraft  <d@domob.eu>
2273
2274         * intrinsics/string_intrinsics.c: #include <assert.h>
2275         * intrinsics/string_intrinsics_inc.c (string_trim): Use string_len_trim
2276         instead of calculating the length directly.
2277         (string_len_trim): For KIND=1, speed search up.
2278
2279 2009-03-24  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2280
2281         PR libfortran/39528
2282         * io/list_read.c (list_formatted_read_scalar): Move check for read
2283         completion to just after the check for a repeated value.
2284
2285 2009-03-08  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2286
2287         PR libfortran/39402
2288         * io/write_float.def (output_float): Handle F0.d formatting correctly
2289         for any d when value is 0.0.
2290
2291 2009-03-01  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
2292
2293         * configure: Regenerate.
2294
2295 2009-01-21  Daniel Kraft  <d@domob.eu>
2296
2297         PR fortran/38887
2298         * runtime/in_unpack_generic.c (internal_unpack):  Return instead of
2299         abort when called with empty array.
2300         * m4/in_unpack.m4:  Ditto.
2301         * generated/in_unpack_i1.c:  Regenerated.
2302         * generated/in_unpack_i2.c:  Regenerated.
2303         * generated/in_unpack_i4.c:  Regenerated.
2304         * generated/in_unpack_i8.c:  Regenerated.
2305         * generated/in_unpack_i16.c: Regenerated.
2306         * generated/in_unpack_r4.c:  Regenerated.
2307         * generated/in_unpack_r8.c:  Regenerated.
2308         * generated/in_unpack_r10.c: Regenerated.
2309         * generated/in_unpack_r16.c: Regenerated.
2310         * generated/in_unpack_c4.c:  Regenerated.
2311         * generated/in_unpack_c8.c:  Regenerated.
2312         * generated/in_unpack_c10.c: Regenerated.
2313         * generated/in_unpack_c16.c: Regenerated.
2314
2315 2009-01-12  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2316
2317         PR libfortran/38772
2318         * io/read.c (read_f): Clean up loop conditions for BZ/BN,
2319         allowing proper digit testing. White space fix.
2320
2321 2009-01-05  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2322
2323         PR libfortran/38735
2324         * io/unit.c (get_internal_unit): Set default BLANK= status to NULL for
2325         internal units.
2326
2327 2008-12-29  John David Anglin  <dave.anglin@nrc-cnrc.gc.ca>
2328
2329         PR fortran/31832
2330         * acinclude.m4 (LIBGFOR_CHECK_FOR_BROKEN_POWF): New autoconf check for
2331         broken powf.
2332         * configure.ac (LIBGFOR_CHECK_FOR_BROKEN_POWF): Use it.
2333         * intrinsics/c99_functions.c: Use internal powf implementation if
2334         HAVE_BROKEN_POWF is defined.
2335         * configure: Rebuilt.
2336         * config.h.in: Rebuilt.
2337
2338 2008-12-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2339
2340         PR libfortran/37472
2341         * io/write_float.def (output_float_FMT_G_): Modify calculation of temp
2342         to avoid sensitivity to round-off.
2343
2344 2008-12-21  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2345
2346         PR libfortran/38398
2347         * io/io.h (st_parameter_dt): Add new bit to keep track of when to
2348         suppress blanks for g0 formatting.
2349         * io/transfer.c (formatted_transfer_scalar): Always call write_real_g0
2350         for g0 formatting.
2351         * io.c (write.c): Do not use ES formatting and use new bit to suppress
2352         blanks.
2353         * io/write_float.def (output_float): Adjust the location of setting the
2354         width so that it can be adjusted when suppressing blanks.  Set number of
2355         blanks to zero when dtp->u.p.g0_no_blanks is set. Do some minor code
2356         clean-up and add some white space for readability.
2357
2358 2008-12-18  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
2359
2360         * configure: Regenerate.
2361
2362 2008-12-13  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2363
2364         PR libfortran/38504
2365         io/write.c (write_decimal): Skip extra sign '-' at beginning of string
2366         returned by gfc_itoa.
2367
2368 2008-12-08  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2369
2370         PR libfortran/38430
2371         * io/transfer.c (data_transfer_init): Move constraint check for REC=
2372         and STREAM access into condition for other REC= constraints to simplify.
2373         Comment out this constraint to avoid breaking compatibility with 4.3
2374         until later.  Added a TODO for above comment and this one.
2375         Fix test for max pos.
2376
2377 2008-12-06  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2378
2379         PR libfortran/38291
2380         * io/transfer.c (data_transfer_init): Add fbuf_flush inadvertently
2381         ommitted.  Add check for invalid use of REC= with ACCESS="stream".  Fix
2382         comment.
2383
2384 2008-12-06  Adam Nemet  <anemet@caviumnetworks.com>
2385
2386         * runtime/main.c (store_exe_path): Don't crash if argv0 is NULL.
2387
2388 2008-12-05  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2389
2390         PR libfortran/38291
2391         * io/transfer.c (data_transfer_init): Add checks for POS= valid range.
2392         Add check for unit opened with ACCESS="stream". Flush and seek if
2393         current stream position does not match. Check ENDFILE on read.
2394
2395 2008-12-04  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2396
2397         PR fortran/38285
2398         * write_float.def (WRITE_FLOAT): Zero the float value for special case
2399         only if scale_factor = 0.
2400
2401 2008-11-23  Thomas Koenig  <tkoenig@gcc.gnu.org>
2402
2403         PR libfortran/38234
2404         * intrinsics/reshape_generic.c (reshape_internal):
2405         Source can be larger than shape.
2406         * m4/reshape.m4:  Likewise.
2407         * generated/reshape_c10.c Regenerated.
2408         * generated/reshape_c16.c Regenerated.
2409         * generated/reshape_c4.c Regenerated.
2410         * generated/reshape_c8.c Regenerated.
2411         * generated/reshape_i16.c Regenerated.
2412         * generated/reshape_i4.c Regenerated.
2413         * generated/reshape_i8.c Regenerated.
2414         * generated/reshape_r10.c Regenerated.
2415         * generated/reshape_r16.c Regenerated.
2416         * generated/reshape_r4.c Regenerated.
2417         * generated/reshape_r8.c Regenerated.
2418
2419 2008-11-22  Danny Smith  <dannysmith@users.sourceforge.net>
2420
2421         * libgfortran.h (__mingw_snprintf): Declare with gnu_printf
2422         format attribute.
2423
2424
2425 2008-11-22  Thomas Koenig  <tkoenig@gcc.gnu.org>
2426
2427         PR libfortran/38225
2428         * intrinsics/reshape_generic.c (reshape_internal):
2429         Use all dimensions of source for bounds checking.
2430         * m4/reshape.m4:  Likewise.
2431         * generated/reshape_c10.c Regenerated.
2432         * generated/reshape_c16.c Regenerated.
2433         * generated/reshape_c4.c Regenerated.
2434         * generated/reshape_c8.c Regenerated.
2435         * generated/reshape_i16.c Regenerated.
2436         * generated/reshape_i4.c Regenerated.
2437         * generated/reshape_i8.c Regenerated.
2438         * generated/reshape_r10.c Regenerated.
2439         * generated/reshape_r16.c Regenerated.
2440         * generated/reshape_r4.c Regenerated.
2441         * generated/reshape_r8.c Regenerated.
2442
2443 2008-11-22  Jakub Jelinek  <jakub@redhat.com>
2444
2445         PR libfortran/37839
2446         * io/io.h (IOPARM_INQUIRE_HAS_ROUND, IOPARM_INQUIRE_HAS_SIGN,
2447         IOPARM_INQUIRE_HAS_PENDING): Adjust values.
2448         (st_parameter_inquire): Reorder and fix types of round, sign and
2449         pending fields.
2450         (st_parameter_43, st_parameter_44): Removed.
2451         (st_parameter_dt): Put back struct definition directly to u.p
2452         declaration.  Change type of u.p.size_used from gfc_offset to
2453         GFC_IO_INT.  Decrease back size of u.pad to 16 pointers and
2454         32 ints.  Put id, pos, asynchronous, blank, decimal, delim,
2455         pad, round and sign fields after the union.
2456         * io/inquire.c (inquire_via_unit, inquire_via_filename): Only read
2457         flags2 if it is defined.
2458         * io/transfer.c (read_sf, read_block_form, write_block): Cast
2459         additions to size_used to GFC_IO_INT instead of gfc_offset.
2460         (data_transfer_init): Clear whole u.p struct.  Adjust
2461         for moving id, pos, asynchronous, blank, decimal, delim, pad,
2462         round and sign fields from u.p directly into st_parameter_dt.
2463         (finalize_transfer): Don't cast size_used to GFC_IO_INT.
2464         * io/file_pos.c (st_endfile): Clear whole u.p struct.
2465
2466 2008-11-20  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2467
2468         PR libfortran/37472
2469         * io/write_float.def (output_float_FMT_G_): Adjust conversion of
2470         G format specification to F format.
2471
2472 2008-11-18  Thomas Koenig  <tkoenig@gcc.gnu.org>
2473
2474         PR libfortran/38135
2475         * m4/reshape.m4:  Correct bounds checking when PAD is present.
2476         Treat PAD as if it were SOURCE when SOURCE is empty.
2477         * intrinsics/reshape_generic.c:  Likewise.
2478         * generated/reshape_c10.c Regenerated.
2479         * generated/reshape_c16.c Regenerated.
2480         * generated/reshape_c4.c Regenerated.
2481         * generated/reshape_c8.c Regenerated.
2482         * generated/reshape_i16.c Regenerated.
2483         * generated/reshape_i4.c Regenerated.
2484         * generated/reshape_i8.c Regenerated.
2485         * generated/reshape_r10.c Regenerated.
2486         * generated/reshape_r16.c Regenerated.
2487         * generated/reshape_r4.c Regenerated.
2488         * generated/reshape_r8.c Regenerated.
2489
2490 2008-11-16  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2491
2492         PR libfortran/38097
2493         * io/read.c (read_f): Initialize exponent. Fix comment. Set loop
2494         conditions for BZ/BN.
2495         * io/unit.c (get_internal_unit): Initialize flags.blank.
2496         * io/transfer.c (data_transfer_init): Fix whitespace.
2497
2498 2008-11-15  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2499
2500         PR libfortran/37294
2501         * io/write.c (namelist_write_newline): Use array loop specification to
2502         advance to next internal array unit record. (namelist_write): Adjust to
2503         accomodate the internal array unit behavior.
2504
2505 2008-11-01  Dennis Wassel  <dennis.wassel@gmail.com>
2506
2507         PR fortran/37159
2508         * intrinsics/random.c: Added comment to adapt check.c, should
2509         kiss_size change.
2510         Few cosmetic changes to existing comments.
2511
2512 2008-10-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2513
2514         PR libfortran/37707
2515         * io/list_read.c (read_character): Remove code to look ahead in namelist
2516         reads to descriminate non-delimited strings from namelist objects.
2517         * io/write.c (namelist_write): Delimit character strings with quote or
2518         apostrophe, defaulting to quote.
2519
2520 2008-10-21  Thomas Koenig  <tkoenig@gcc.gnu.org>
2521
2522         PR libfortran/34670
2523         * intrinsics/transpose_generic.c:  Implement bounds checking.
2524         * m4/transpose.m4:  Likewise.
2525         * generated/transpose_c8.c: Regenerated.
2526         * generated/transpose_c16.c: Regenerated.
2527         * generated/transpose_r10.c: Regenerated.
2528         * generated/transpose_i8.c: Regenerated.
2529         * generated/transpose_c10.c: Regenerated.
2530         * generated/transpose_r4.c: Regenerated.
2531         * generated/transpose_c4.c: Regenerated.
2532         * generated/transpose_i16.c: Regenerated.
2533         * generated/transpose_i4.c: Regenerated.
2534         * generated/transpose_r8.c: Regenerated.
2535         * generated/transpose_r16.c: Regenerated.
2536
2537 2008-10-19  Jerry DeLisle  <jvdelisle@gcc.gnu.org
2538
2539         PR libfortran/37834
2540         * io/write_float.def (output_float): Emit '0.' for special case of
2541         format specifier 'f0.0' and value of zero. Likewise emit '0' for 'f1.0'.
2542
2543 2008-10-17  Jerry DeLisle  <jvdelisle@gcc.gnu.org
2544
2545         PR libfortran/37863
2546         * io/write_float.def (WRITE_FLOAT): Round to 1.0 correctly.
2547         * io/io.h (st_parameter_44): Fix id type declaration.
2548
2549 2008-10-16  Thomas Koenig  <tkoenig@gcc.gnu.org>
2550
2551         * io/file_pos.c (unformatted_backspace): Normal case is
2552         GFC_CONVERT_NATIVE.
2553         * io/transfer.c (read_sf):  Mark paths leading to generate_error()
2554         as unlikely.
2555         (readl_block_form):  Likewise.
2556         (read_block_direct):  Likewise.
2557         (write_block):  Likewise.
2558         (write_buf):  Likewise.
2559         (us_read):  Likewise.  Normal case is GFC_CONVERT_NATIVE.
2560         (next_record_w_unf):  Mark paths leading to generate_error()
2561         as unlikely.
2562
2563 2008-10-16  Thomas Koenig  <tkoenig@gcc.gnu.org>
2564
2565         PR libfortran/34670
2566         * generated/spread_r4.c: Regenerated.
2567
2568 2008-10-15  Thomas Koenig  <tkoenig@gcc.gnu.org>
2569
2570         PR libfortran/34670
2571         * intrinsics/reshape_generic.c:  Add bounds checking.
2572         * m4/reshape.m4:  Likewise.
2573         * generated/reshape_c10.c: Regenerated.
2574         * generated/reshape_c16.c: Regenerated.
2575         * generated/reshape_c4.c: Regenerated.
2576         * generated/reshape_c8.c: Regenerated.
2577         * generated/reshape_i16.c: Regenerated.
2578         * generated/reshape_i4.c: Regenerated.
2579         * generated/reshape_i8.c: Regenerated.
2580         * generated/reshape_r10.c: Regenerated.
2581         * generated/reshape_r16.c: Regenerated.
2582         * generated/reshape_r4.c: Regenerated.
2583         * generated/reshape_r8.c: Regenerated.
2584         * generated/spread_r4.c: Regenerated.
2585
2586 2008-10-13  Jerry DeLisle  <jvdelisle@gcc.gnu.org
2587
2588         PR libfortran/37083
2589         * io/list_read.c (next_char): Simplify EOF tests and set endfile flag.
2590         (finish_list_read): Add EOF check.
2591
2592 2008-10-09  Thomas Koenig  <tkoenig@gcc.gnu.org>
2593
2594         PR libfortran/37753
2595         * io/transfer.c (unformatted_read):  CONVERT_NATIVE
2596         is the usual case.  Check for kind==1 for non-byte-reversing
2597         operation.
2598         (unformatted_write):  Likewise.
2599
2600 2008-10-08  Jerry DeLisle  <jvdelisle@gcc.gnu.org
2601
2602         PR libfortran/37707
2603         * io/list_read.c (nml_get_obj_data): If the first namelist object rank
2604         is greater than zero, call nml_object_read with the first object rather
2605         than the sub-object.
2606
2607 2008-09-26  Peter O'Gorman  <pogma@thewrittenword.com>
2608             Steve Ellcey  <sje@cup.hp.com>
2609
2610         * configure: Regenerate for new libtool.
2611         * Makefile.in: Ditto.
2612
2613 2008-09-25  Jerry DeLisle  <jvdelisle@gcc.gnu.org
2614
2615         PR libfortran/37498
2616         * list_read.c (eat_separator): Revert previous patch and move
2617         delim_status, decimal_status, and pad_status to gfc_unit.
2618         (parse_real): Ditto. (read_real): Ditto.
2619         * read.c (read_a): Likewise. (read_a_char4): Likewise.
2620         (read_f): Likewise.
2621         * inquire.c (inquire_via_unit): Add missing check for
2622         IOPARM_INQUIRE_HAS_FLAGS2. (inquire_via_filename): Likewise.
2623         * io.h (unit_sign_s): Move delim_status, decimal_status, and pad_status
2624         to gfc_unit.
2625         * transfer.c (read_sf): Ditto. (read_block_form): Ditto.
2626         (formatted_transfer_scalar): Ditto. (data_transfer_init): Ditto.
2627         * write.c (write_default_char4): Ditto. (write_utf8_char4): Ditto.
2628         (write_character): Ditto. (write_real_g0): Ditto.
2629         (list_formatted_write_scalar): Ditto. (nml_write_obj): Ditto.
2630         (namelist_write): Ditto.
2631         * write_float.def (calculate_sign): Ditto. (output_float): Ditto.
2632
2633 2008-09-24  Tobias Burnus  <burnus@net-b.de>
2634
2635         * runtime/compile_options.c (init_compile_options):
2636         Sync flags with front end.
2637
2638 2008-09-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org
2639
2640         PR libfortran/37498
2641         * file_pos (st_endfile): Clear memory only for libfortran 4.3 private
2642         area.
2643         * list_read.c (eat_separator): Only access F2003 I/O parameters if
2644         IOPARM_DT_HAS_F2003 bit is set. (parse_real): Ditto.
2645         (read_real): Ditto.
2646         * read.c (read_a): Likewise. (read_a_char4): Likewise though not
2647         strictly necessary. (read_f): Likewise.
2648         * io.h (unit_sign_s): New enumerator to allow duplication of
2649         st_parameter structures. (IOPARM_DT_HAS_F2003): New mask bit.
2650         (st_parameter_43): New structure copied from 4.3 version of
2651         st_paramater_dt private section. (st_parameter_44): New structure with
2652         F2003 items added. (st_parameter_dt): Modified to create union of new
2653         and old structures to allow correct memory setting for 4.3 ABI
2654         compatibility. Bumped the pad size.
2655         * transfer.c (read_sf): Do not use F2003 I/O memory areas unless
2656         IOPARM_DT_HAS_F2003 bit has been set. (read_block_form): Ditto.
2657         (formatted_transfer_scalar): Ditto. (data_transfer_init): Ditto and
2658         add comment, fix formatting.
2659         * write.c (write_default_char4): Likewise though not strictly necessary.
2660         (write_utf8_char4): Ditto. (write_character): Ditto.
2661         (write_real_g0): Ditto. (list_formatted_write_scalar): Ditto.
2662         (nml_write_obj): Ditto. (namelist_write): Ditto.
2663         * write_float.def (calculate_sign): Eliminate warning by including all
2664         cases in switch. (output_float): Output only decimal point of F2003 flag
2665         is not set.
2666
2667 2008-09-10  Tobias Burnus  <burnus@net-b.de>
2668             H. J. Lu  <hongjiu.lu@intel.com>
2669
2670         * mk-sik-inc.sh: Make -Wunused-variable proof.
2671         * mk-srk-inc.sh: Make -Wunused-variable proof.
2672
2673 2008-09-10  Tobias Burnus  <burnus@net-b.de>
2674
2675         * mk-kinds-h.sh: Make -Wunused-variable proof.
2676
2677 2008-09-07  Thomas Koenig  <tkoenig@gcc.gnu.org>
2678
2679         PR fortran/37203
2680         * intrinsics/reshape_generic.c:  Add checking on
2681         out-of-bounds and duplicate values of order argument.
2682         * m4/reshape.m4:  Likewise.
2683         * generated/reshape_c10.c: Regenerated.
2684         * generated/reshape_c16.c: Regenerated.
2685         * generated/reshape_c4.c: Regenerated.
2686         * generated/reshape_c8.c: Regenerated.
2687         * generated/reshape_i16.c: Regenerated.
2688         * generated/reshape_i4.c: Regenerated.
2689         * generated/reshape_i8.c: Regenerated.
2690         * generated/reshape_r10.c: Regenerated.
2691         * generated/reshape_r16.c: Regenerated.
2692         * generated/reshape_r4.c: Regenerated.
2693         * generated/reshape_r8.c: Regenerated.
2694
2695 2008-09-06  Tobias Burnus  <burnus@net-b.de>
2696
2697         * libgfortran.h (likely,unlikely): New makros.
2698         (runtime_warning_at,__mingw_snprintf): Add __attribute__(format()).
2699         * m4/spread.m4 (spread_'rtype_code`): Use unlikely for bounds_check.
2700         * m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Ditto.
2701         * m4/matmull.m4 (matmul_'rtype_code`): Ditto.
2702         * m4/ifunction_logical.m4 (name`'rtype_qual`_'atype_code): Ditto.
2703         * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): Ditto.
2704         * m4/matmul.m4 (matmul_'rtype_code`): Ditto.
2705
2706         * generated/minval_r8.c: Regenerated.
2707         * generated/spread_r10.c: Regenerated.
2708         * generated/minloc1_16_r16.c: Regenerated.
2709         * generated/maxloc1_4_r8.c: Regenerated.
2710         * generated/sum_i8.c: Regenerated.
2711         * generated/any_l16.c: Regenerated.
2712         * generated/spread_i8.c: Regenerated.
2713         * generated/maxval_i2.c: Regenerated.
2714         * generated/any_l2.c: Regenerated.
2715         * generated/product_r4.c: Regenerated.
2716         * generated/maxloc1_8_i4.c: Regenerated.
2717         * generated/maxloc0_4_r4.c: Regenerated.
2718         * generated/all_l1.c: Regenerated.
2719         * generated/matmul_r8.c: Regenerated.
2720         * generated/product_i2.c: Regenerated.
2721         * generated/minloc0_4_r16.c: Regenerated.
2722         * generated/minloc0_4_i1.c: Regenerated.
2723         * generated/maxloc0_4_r16.c: Regenerated.
2724         * generated/maxloc0_4_i2.c: Regenerated.
2725         * generated/minloc1_8_r16.c: Regenerated.
2726         * generated/maxloc1_8_r16.c: Regenerated.
2727         * generated/maxloc0_8_i8.c: Regenerated.
2728         * generated/sum_r16.c: Regenerated.
2729         * generated/sum_i1.c: Regenerated.
2730         * generated/minloc1_4_r8.c: Regenerated.
2731         * generated/maxloc1_16_r16.c: Regenerated.
2732         * generated/minloc1_16_i4.c: Regenerated.
2733         * generated/maxloc1_16_i4.c: Regenerated.
2734         * generated/minloc0_16_i8.c: Regenerated.
2735         * generated/spread_i1.c: Regenerated.
2736         * generated/maxloc0_16_i8.c: Regenerated.
2737         * generated/maxval_r16.c: Regenerated.
2738         * generated/product_c10.c: Regenerated.
2739         * generated/minloc1_8_i4.c: Regenerated.
2740         * generated/minloc0_16_i16.c: Regenerated.
2741         * generated/matmul_r16.c: Regenerated.
2742         * generated/minloc0_4_r4.c: Regenerated.
2743         * generated/all_l2.c: Regenerated.
2744         * generated/product_c4.c: Regenerated.
2745         * generated/sum_r4.c: Regenerated.
2746         * generated/minloc0_4_i2.c: Regenerated.
2747         * generated/spread_c10.c: Regenerated.
2748         * generated/maxloc0_8_i1.c: Regenerated.
2749         * generated/spread_r4.c: Regenerated.
2750         * generated/minloc0_8_i8.c: Regenerated.
2751         * generated/matmul_c8.c: Regenerated.
2752         * generated/all_l16.c: Regenerated.
2753         * generated/minloc1_16_r10.c: Regenerated.
2754         * generated/sum_i2.c: Regenerated.
2755         * generated/minloc0_16_i1.c: Regenerated.
2756         * generated/maxloc0_16_i1.c: Regenerated.
2757         * generated/maxloc1_8_r8.c: Regenerated.
2758         * generated/minval_i16.c: Regenerated.
2759         * generated/spread_i2.c: Regenerated.
2760         * generated/maxval_i4.c: Regenerated.
2761         * generated/minval_i8.c: Regenerated.
2762         * generated/any_l4.c: Regenerated.
2763         * generated/maxloc1_4_i8.c: Regenerated.
2764         * generated/maxloc0_16_i16.c: Regenerated.
2765         * generated/maxloc0_8_r4.c: Regenerated.
2766         * generated/minloc1_4_i16.c: Regenerated.
2767         * generated/maxloc1_4_i16.c: Regenerated.
2768         * generated/minloc0_4_r10.c: Regenerated.
2769         * generated/minloc0_8_i16.c: Regenerated.
2770         * generated/maxloc0_4_r10.c: Regenerated.
2771         * generated/maxloc0_8_i16.c: Regenerated.
2772         * generated/minloc1_8_r10.c: Regenerated.
2773         * generated/product_i4.c: Regenerated.
2774         * generated/minloc0_16_r4.c: Regenerated.
2775         * generated/sum_c16.c: Regenerated.
2776         * generated/maxloc1_8_r10.c: Regenerated.
2777         * generated/maxloc0_16_r4.c: Regenerated.
2778         * generated/minloc1_16_r8.c: Regenerated.
2779         * generated/minloc0_8_i1.c: Regenerated.
2780         * generated/maxloc0_4_i4.c: Regenerated.
2781         * generated/maxloc1_16_r8.c: Regenerated.
2782         * generated/maxloc0_8_i2.c: Regenerated.
2783         * generated/sum_r10.c: Regenerated.
2784         * generated/count_4_l.c: Regenerated.
2785         * generated/sum_c4.c: Regenerated.
2786         * generated/count_8_l.c: Regenerated.
2787         * generated/maxloc1_16_r10.c: Regenerated.
2788         * generated/matmul_i8.c: Regenerated.
2789         * generated/minloc0_16_i2.c: Regenerated.
2790         * generated/minloc1_8_r8.c: Regenerated.
2791         * generated/maxloc0_16_i2.c: Regenerated.
2792         * generated/spread_c4.c: Regenerated.
2793         * generated/matmul_c16.c: Regenerated.
2794         * generated/maxval_r10.c: Regenerated.
2795         * generated/minval_i1.c: Regenerated.
2796         * generated/maxloc1_4_i1.c: Regenerated.
2797         * generated/matmul_r10.c: Regenerated.
2798         * generated/minloc1_4_i8.c: Regenerated.
2799         * generated/minloc0_8_r4.c: Regenerated.
2800         * generated/matmul_l4.c: Regenerated.
2801         * generated/product_i16.c: Regenerated.
2802         * generated/minloc0_16_r16.c: Regenerated.
2803         * generated/all_l4.c: Regenerated.
2804         * generated/minloc0_4_i4.c: Regenerated.
2805         * generated/minloc0_8_i2.c: Regenerated.
2806         * generated/matmul_i1.c: Regenerated.
2807         * generated/minval_r4.c: Regenerated.
2808         * generated/maxloc1_4_r4.c: Regenerated.
2809         * generated/spread_i16.c: Regenerated.
2810         * generated/sum_i4.c: Regenerated.
2811         * generated/maxval_r8.c: Regenerated.
2812         * generated/spread_i4.c: Regenerated.
2813         * generated/minloc1_4_i1.c: Regenerated.
2814         * generated/minval_r16.c: Regenerated.
2815         * generated/minval_i2.c: Regenerated.
2816         * generated/maxloc1_4_i2.c: Regenerated.
2817         * generated/product_r8.c: Regenerated.
2818         * generated/maxloc1_8_i8.c: Regenerated.
2819         * generated/maxloc0_4_r8.c: Regenerated.
2820         * generated/maxloc0_16_r16.c: Regenerated.
2821         * generated/matmul_r4.c: Regenerated.
2822         * generated/sum_c10.c: Regenerated.
2823         * generated/minloc1_4_r16.c: Regenerated.
2824         * generated/maxloc1_4_r16.c: Regenerated.
2825         * generated/minloc0_8_r16.c: Regenerated.
2826         * generated/maxloc0_8_r16.c: Regenerated.
2827         * generated/count_1_l.c: Regenerated.
2828         * generated/maxloc0_8_i4.c: Regenerated.
2829         * generated/matmul_i2.c: Regenerated.
2830         * generated/minloc1_4_r4.c: Regenerated.
2831         * generated/matmul_c10.c: Regenerated.
2832         * generated/minloc0_16_i4.c: Regenerated.
2833         * generated/maxloc0_16_i4.c: Regenerated.
2834         * generated/minloc1_16_i8.c: Regenerated.
2835         * generated/maxloc1_16_i8.c: Regenerated.
2836         * generated/minloc1_4_i2.c: Regenerated.
2837         * generated/matmul_l16.c: Regenerated.
2838         * generated/maxloc1_8_i1.c: Regenerated.
2839         * generated/minloc0_16_r10.c: Regenerated.
2840         * generated/minloc1_8_i8.c: Regenerated.
2841         * generated/minloc0_4_r8.c: Regenerated.
2842         * generated/product_r16.c: Regenerated.
2843         * generated/product_c8.c: Regenerated.
2844         * generated/sum_r8.c: Regenerated.
2845         * generated/minloc0_8_i4.c: Regenerated.
2846         * generated/matmul_c4.c: Regenerated.
2847         * generated/minloc1_16_i16.c: Regenerated.
2848         * generated/spread_r8.c: Regenerated.
2849         * generated/maxloc1_8_r4.c: Regenerated.
2850         * generated/minloc1_16_i1.c: Regenerated.
2851         * generated/maxloc1_16_i1.c: Regenerated.
2852         * generated/spread_r16.c: Regenerated.
2853         * generated/minval_r10.c: Regenerated.
2854         * generated/count_16_l.c: Regenerated.
2855         * generated/minval_i4.c: Regenerated.
2856         * generated/minloc1_8_i1.c: Regenerated.
2857         * generated/maxloc1_4_i4.c: Regenerated.
2858         * generated/maxloc1_8_i2.c: Regenerated.
2859         * generated/maxval_i8.c: Regenerated.
2860         * generated/any_l8.c: Regenerated.
2861         * generated/maxloc0_16_r10.c: Regenerated.
2862         * generated/minloc0_4_i16.c: Regenerated.
2863         * generated/maxloc0_8_r8.c: Regenerated.
2864         * generated/maxloc0_4_i16.c: Regenerated.
2865         * generated/minloc1_4_r10.c: Regenerated.
2866         * generated/minloc1_8_i16.c: Regenerated.
2867         * generated/maxloc1_4_r10.c: Regenerated.
2868         * generated/maxloc1_8_i16.c: Regenerated.
2869         * generated/minloc0_8_r10.c: Regenerated.
2870         * generated/maxloc0_8_r10.c: Regenerated.
2871         * generated/minloc1_16_r4.c: Regenerated.
2872         * generated/maxloc1_16_r4.c: Regenerated.
2873         * generated/minloc0_16_r8.c: Regenerated.
2874         * generated/product_i8.c: Regenerated.
2875         * generated/maxloc0_16_r8.c: Regenerated.
2876         * generated/sum_i16.c: Regenerated.
2877         * generated/count_2_l.c: Regenerated.
2878         * generated/maxloc0_4_i8.c: Regenerated.
2879         * generated/maxloc1_16_i16.c: Regenerated.
2880         * generated/matmul_i4.c: Regenerated.
2881         * generated/minloc1_8_r4.c: Regenerated.
2882         * generated/sum_c8.c: Regenerated.
2883         * generated/minloc1_16_i2.c: Regenerated.
2884         * generated/maxloc1_16_i2.c: Regenerated.
2885         * generated/maxval_i16.c: Regenerated.
2886         * generated/spread_c8.c: Regenerated.
2887         * generated/matmul_i16.c: Regenerated.
2888         * generated/minloc1_4_i4.c: Regenerated.
2889         * generated/maxval_i1.c: Regenerated.
2890         * generated/minloc1_8_i2.c: Regenerated.
2891         * generated/any_l1.c: Regenerated.
2892         * generated/product_c16.c: Regenerated.
2893         * generated/minloc0_8_r8.c: Regenerated.
2894         * generated/matmul_l8.c: Regenerated.
2895         * generated/product_r10.c: Regenerated.
2896         * generated/product_i1.c: Regenerated.
2897         * generated/all_l8.c: Regenerated.
2898         * generated/maxloc0_4_i1.c: Regenerated.
2899         * generated/minloc0_4_i8.c: Regenerated.
2900         * generated/spread_c16.c: Regenerated.
2901         * generated/maxval_r4.c: Regenerated.
2902
2903 2008-09-01  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2904
2905         PR libfortran/37301
2906         PR libfortran/37228
2907         * io/io.h (write_real_g0): Declare new function to handle g0.d format.
2908         * io/transfer.c (formatted_transfer_scalar): Use new function.
2909         * io/format.c (parse_format_list): Enable g0.d.
2910         * io/write.c (write_a_char4): Delete unused var.
2911         (set_fnode_default): New function to set the default fnode w, d, and e
2912         factored from write_real. (write_real): Use new factored function.
2913         (write_real_g0): New function that sets d to that passed by g0.d format
2914         specifier and set format to ES.  Default values for w and e are used
2915         from the new function, set_fnode_default.
2916
2917 2008-09-01  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2918
2919         * runtime/error.c: Fix cast for printf.
2920
2921 2008-08-30  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2922
2923         PR libfortran/36895
2924         * io/write.c (namelist_write_newline): New function to correctly mark
2925         next records in both external and internal units.
2926         (nml_write_obj): Use new function.
2927         (namelist_write: Use new function.
2928
2929 2008-08-19  Tobias Burnus  <burnus@net-b.de>
2930
2931         PR libfortran/35863
2932         * io/write.c (write_a_char4): Add missing variable declaration
2933         in HAVE_CRLF block.
2934
2935 2008-08-15  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2936
2937         PR libfortran/35863
2938         * intrinsics/selected_char_kind.c: Enable iso_10646.
2939         * io/read.c (typedef uchar): New type.
2940         (read_utf8): New function to read a single UTF-8 encoded character.
2941         (read_utf8_char1): New function to read UTF-8 into a KIND=1 string.
2942         (read_default_char1): New functio to read default into KIND=1 string.
2943         (read_utf8_char4): New function to read UTF-8 into a KIND=4 string.
2944         (read_default_char4): New function to read UTF-8 into a KIND=4 string.
2945         (read_a): Modify to use the new functions.
2946         (read_a_char4): Modify to use the new functions.
2947         * io/write.c (error.h): Add include. (typedef uchar): New type.
2948         (write_default_char4): New function to default write KIND=4 string.
2949         (write_utf8_char4): New function to UTF-8 write KIND=4 string.
2950         (write_a_char4): Modify to use new functions.
2951         (write_character): Modify to use new functions.
2952
2953 2008-08-14  H.J. Lu  <hongjiu.lu@intel.com>
2954
2955         PR libfortran/37123
2956         * intrinsics/cshift0.c (cshift0): Fix 2 typos.
2957
2958 2008-08-14  Thomas Koenig  <tkoenig@gcc.gnu.org>
2959
2960         PR libfortran/36886
2961         * Makefile.am:  Added $(i_cshift0_c).
2962         Added $(i_cshift0_c) to gfor_built_specific_src.
2963         Add rule to build from cshift0.m4.
2964         * Makefile.in:  Regenerated.
2965         * libgfortran.h:  Addedd prototypes for cshift0_i1,
2966         cshift0_i2, cshift0_i4, cshift0_i8, cshift0_i16,
2967         cshift0_r4, cshift0_r8, cshift0_r10, cshift0_r16,
2968         cshift0_c4, cshift0_c8, cshift0_c10, cshift0_c16.
2969         Define Macros GFC_UNALIGNED_C4 and GFC_UNALIGNED_C8.
2970         * intrinsics/cshift0.c:  Remove helper functions for
2971         the innter shift loop.
2972         (cshift0):  Call specific functions depending on type
2973         of array argument.  Only call specific functions for
2974         correct alignment for other types.
2975         * m4/cshift0.m4:  New file.
2976         * generated/cshift0_i1.c:  New file.
2977         * generated/cshift0_i2.c:  New file.
2978         * generated/cshift0_i4.c:  New file.
2979         * generated/cshift0_i8:.c  New file.
2980         * generated/cshift0_i16.c:  New file.
2981         * generated/cshift0_r4.c:  New file.
2982         * generated/cshift0_r8.c:  New file.
2983         * generated/cshift0_r10.c:  New file.
2984         * generated/cshift0_r16.c:  New file.
2985         * generated/cshift0_c4.c:  New file.
2986         * generated/cshift0_c8.c:  New file.
2987         * generated/cshift0_c10.c:  New file.
2988         * generated/cshift0_c16.c:  New file.
2989
2990 2008-07-27  Tobias Burnus  <burnus@net-b.de>
2991
2992         PR fortran/36132
2993         PR fortran/29952
2994         PR fortran/36909
2995         * runtime/error.c: New function runtime_error_at.
2996         * gfortran.map: Ditto.
2997         * libgfortran.h: Ditto.
2998
2999 2008-07-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
3000
3001         PR fortran/36582
3002         * io/list_read.c: If variable rank is zero, do not adjust the found
3003         namelist object pointer.
3004
3005 2008-07-22  Daniel Kraft  <d@domob.eu>
3006
3007         PR fortran/29835
3008         * io/format.c (struct format_data):  New member error_element.
3009         (unexpected_element):  Added '%c' to message.
3010         (next_char):  Keep track of last parsed character in fmt->error_element.
3011         (format_error):  If the message is unexpected_element, output the
3012         offending character, too.
3013
3014 2008-07-22  Thomas Koenig  <tkoenig@gcc.gnu.org>
3015
3016         PR libfortran/36890
3017         * io/file_pos.c:  Declare READ_CHUNK as signed to avoid
3018         signed/unsigned comparison warning in formatted_backspace.
3019
3020 2008-07-21  Thomas Koenig  <tkoenig@gcc.gnu.org>
3021
3022         PR libfortran/36773
3023         * intrinsics/cshift0.c (cshift0):  Return early if size of array
3024         is zero.
3025         * intrinsics/eoshift0.c (eoshift0):  Return early if size of
3026         return array is zero.
3027         * intrinsics/eoshift2.c (eoshift2):  Likewise.
3028         * m4/eoshift1.m4 (eoshift1):  Return early if size of array
3029         is zero.
3030         * m4/eoshift3.m4 (eoshift3):  Likewise.
3031         * m4/eoshift2.m4 (eoshift2):  Return early if size of return
3032         array is zero.
3033         * m4/eoshift4.m4 (eoshift2):  Return early if size of return
3034         array is zero.
3035         * generated/cshift1_16.c: Regenerated.
3036         * generated/cshift1_4.c: Regenerated.
3037         * generated/cshift1_8.c: Regenerated.
3038         * generated/eoshift1_16.c: Regenerated.
3039         * generated/eoshift1_4.c: Regenerated.
3040         * generated/eoshift1_8.c: Regenerated.
3041         * generated/eoshift3_16.c: Regenerated.
3042         * generated/eoshift3_4.c: Regenerated.
3043         * generated/eoshift3_8.c: Regenerated.
3044
3045 2008-07-20  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
3046
3047         PR fortran/36857
3048         * io/write_float.def: Comment out locale dependent code and fix general
3049         comments.
3050
3051 2008-07-07  Thomas Koenig  <tkoenig@gcc.gnu.org>
3052
3053         PR fortran/36341
3054         PR fortran/34670
3055         * m4/matmul.m4:  Add bounds checking.
3056         * m4/matmull.m4:  Likewise.
3057         * generated/matmul_c10.c: Regenerated.
3058         * generated/matmul_c16.c: Regenerated.
3059         * generated/matmul_c4.c: Regenerated.
3060         * generated/matmul_c8.c: Regenerated.
3061         * generated/matmul_i1.c: Regenerated.
3062         * generated/matmul_i16.c: Regenerated.
3063         * generated/matmul_i2.c: Regenerated.
3064         * generated/matmul_i4.c: Regenerated.
3065         * generated/matmul_i8.c: Regenerated.
3066         * generated/matmul_l16.c: Regenerated.
3067         * generated/matmul_l4.c: Regenerated.
3068         * generated/matmul_l8.c: Regenerated.
3069         * generated/matmul_r10.c: Regenerated.
3070         * generated/matmul_r16.c: Regenerated.
3071         * generated/matmul_r4.c: Regenerated.
3072         * generated/matmul_r8.c: Regenerated.
3073
3074 2008-07-07  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
3075
3076         * acinclude.m4 (LIBGFOR_CHECK_GTHR_DEFAULT): Fix configure cache
3077         variable name.
3078         * configure: Regenerate.
3079
3080 2008-07-01  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
3081
3082         PR fortran/36676
3083         * io/list_read.c (find_nml_name): Use eat_separator instead of eat_line.
3084
3085 2008-06-28  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
3086
3087         PR fortran/36657
3088         * io/list_read.c (read_character): Check for '!' along with separators.
3089         (find_nml_name): Likewise and eat the comment if found.
3090
3091 2008-06-17  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
3092
3093         * configure: Regenerate.
3094
3095 2008-06-16  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
3096
3097         PR fortran/36546
3098         * io/list_read.c (eat_separator): Add tab character to condition
3099         for looping past whitespace.
3100
3101 2008-06-14  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
3102
3103         PR fortran/36515
3104         * libgfortran.h (compile_options_t): Add int range_check to structure.
3105         * runtime/compile_options.c (set_options): Add range_check option.
3106         (init_compile_options): Likewise.
3107         *io/read.c (read_decimal): Change overflow checks to include
3108         range_check.
3109
3110 2008-06-13  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
3111
3112         PR fortran/36538
3113         * io/list_read.c (namelist_read): Add eat_separator to eliminate leading
3114         tabs.
3115
3116 2008-06-13  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
3117
3118         PR fortran/35863
3119         * libgfortran.h: Change l8_to_l4_offset to big_endian and add endian_off.
3120         * runtime/main.c: Fix error in comment. Change l8_to_l4_offset to
3121         big_endian. (determine_endianness): Add endian_off and set its value
3122         according to big_endian.
3123         * gfortran.map: Add symbol for new _gfortran_transfer_character_wide.
3124         * io/io.h: Add prototype declarations for new functions.
3125         * io/list_read.c (list_formatted_read_scalar): Modify to handle kind=4.
3126         (list_formatted_read): Calculate stride based on kind for character type
3127         and use it when calling list_formatted_read_scalar.
3128         * io/inquire.c (inquire_via_unit): Change l8_to_l4_offset to big_endian.
3129         * io/open.c (st_open): Change l8_to_l4_offset to big_endian.
3130         * io/read.c (read_a_char4): New function to handle formatted read.
3131         * io/write.c: Define GFC_CHAR4(x) to improve readability of code.
3132         (write_a_char4): New function to handle formatted write.
3133         (write_character): Modify to accept the kind parameter and adjust for
3134         endianess of the machine. (list_formatted_write): Calculate the stride
3135         resulting from the kind and adjust the list_formatted_write_scalar call
3136         accordingly. (nml_write_obj): Adjust calls to write_character.
3137         (namelist_write): Likewise.
3138         * io/transfer.c (formatted_transfer_scaler): Rename 'len' argument to
3139         'kind' argument to better describe what it is. Add calls to new
3140         functions for kind == 4. (formatted_transfer): Modify to handle the case
3141         of type character and kind equals 4 to pass in the kind to the transfer
3142         routines. (transfer_character_wide): Add this new function.
3143         (transfer_array): Don't set kind to the character string length. Adjust
3144         strides bases on character kind.
3145         (unformatted_read): Adjust size based on kind for character types.
3146         (unformatted_write): Likewise. (data_transfer_init): Change
3147         l8_to_l4_offset to big_endian.
3148         io/fbuf.c (fbuf_seek): Add cast to eliminate warning.
3149
3150 2008-06-13  Tobias Burnus  <burnus@net-b.de>
3151
3152         * configure.ac (AM_CFLAGS): Remove -Werror again.
3153         * configure: Regenerate.
3154
3155 2008-06-13  Tobias Burnus  <burnus@net-b.de>
3156
3157         PR libgfortran/36518
3158         * configure.ac (AM_CFLAGS): Add -Werror.
3159         * configure: Regenerate.
3160         * m4/ifunction_logical.m4: Cast "n" to "(int)".
3161         * generated/any_l16.c: Regenerate.
3162         * generated/any_l2.c: Regenerate.
3163         * generated/all_l1.c: Regenerate.
3164         * generated/all_l2.c: Regenerate.
3165         * generated/all_l16.c: Regenerate.
3166         * generated/any_l4.c: Regenerate.
3167         * generated/count_4_l.c: Regenerate.
3168         * generated/count_8_l.c: Regenerate.
3169         * generated/all_l4.c: Regenerate.
3170         * generated/count_1_l.c: Regenerate.
3171         * generated/count_16_l.c: Regenerate.
3172         * generated/any_l8.c: Regenerate.
3173         * generated/count_2_l.c: Regenerate.
3174         * generated/any_l1.c: Regenerate.
3175         * generated/all_l8.c: Regenerate.
3176
3177 2008-06-13  Tobias Burnus  <burnus@net-b.de>
3178
3179         PR fortran/36495
3180         * configure.ac (AM_FCFLAGS): Add "-Werror -fimplicit-none".
3181         * configure: (generated) ditto.
3182         * intrinsics/dprod_r8.f90: Add "implicit none".
3183
3184 2008-06-07  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
3185
3186         PR libfortran/36420
3187         PR libfortran/36421
3188         PR libfortran/36422
3189         * io/io.h: Add prototype for write_real.
3190         * io/transfer.c (formatted_transfer_scalar): For FMT_G and width zero,
3191         use write_real.
3192         * io/format.c: Add zero width error message. (parse_format_list): Use
3193         error message for FMT_A if followed by FMT_ZERO. Use zero width error
3194         message for FMT_G if mode is READ or if -std=f95 or f2003. (fmormat0):
3195         Fix typo in comment.
3196         * io/write.c(write_a): Set wlen to len if FMT_G and length is zero.
3197         (write_l): Add wlen variable and use it if FMT_G and width is zero.
3198         (write_decimal): If FMT_G, set m to -1 to flag processor dependent
3199         formatting. (write_real): Remove static declaration.
3200
3201 2008-05-28  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
3202
3203         PR fortran/36319
3204         * intrinsics/string_intrinsics_inc.c (string_index): Return
3205         correct value for zero-length substring.
3206         * intrinsics/cshift0.c: Add _char4 variant.
3207         * intrinsics/eoshift0.c (eoshift0): Allow filler to be a pattern
3208         wider than a single byte. Add _char4 variant and use above
3209         functionality.
3210         * intrinsics/eoshift2.c (eoshift2): Likewise.
3211         * m4/eoshift1.m4: Likewise.
3212         * m4/eoshift3.m4: Likewise.
3213         * m4/cshift1.m4: Add _char4 variants.
3214         * gfortran.map (GFORTRAN_1.1): Add _gfortran_cshift0_1_char4,
3215         _gfortran_cshift0_2_char4, _gfortran_cshift0_4_char4,
3216         _gfortran_cshift0_8_char4, _gfortran_cshift1_16_char4,
3217         _gfortran_cshift1_4_char4, _gfortran_cshift1_8_char4,
3218         _gfortran_eoshift0_1_char4, _gfortran_eoshift0_2_char4,
3219         _gfortran_eoshift0_4_char4, _gfortran_eoshift0_8_char4,
3220         _gfortran_eoshift1_16_char4, _gfortran_eoshift1_4_char4,
3221         _gfortran_eoshift1_8_char4, _gfortran_eoshift2_1_char4,
3222         _gfortran_eoshift2_2_char4, _gfortran_eoshift2_4_char4,
3223         _gfortran_eoshift2_8_char4, _gfortran_eoshift3_16_char4,
3224         _gfortran_eoshift3_4_char4 and _gfortran_eoshift3_8_char4.
3225         * generated/eoshift3_4.c: Regenerate.
3226         * generated/eoshift1_8.c: Regenerate.
3227         * generated/eoshift1_16.c: Regenerate.
3228         * generated/cshift1_4.c: Regenerate.
3229         * generated/eoshift1_4.c: Regenerate.
3230         * generated/eoshift3_8.c: Regenerate.
3231         * generated/eoshift3_16.c: Regenerate.
3232         * generated/cshift1_8.c: Regenerate.
3233         * generated/cshift1_16.c: Regenerate.
3234
3235 2008-05-25  Tobias Burnus  <burnus@net-b.de>
3236
3237         PR fortran/32600
3238         * intrinsics/iso_c_binding.c (c_f_procpointer): Remove.
3239         * intrinsics/iso_c_binding.h (c_f_procpointer): Remove.
3240         * gfortran.map (c_f_procpointer): Remove.
3241
3242 2008-05-22  Thomas Koenig  <tkoenig@gcc.gnu.org>
3243
3244         PR libgfortran/36302
3245         * gfortran.map (GFORTRAN_1.1): Add _gfortran_eoshift0_16,
3246         _gfortran_eoshift0_16_char, _gfortran_eoshift2_16,
3247         _gfortran_eoshift2_16_char,_gfortran_cshift0_16,
3248         _gfortran_cshift0_16_char.  Sort alphabetically.
3249         * intrinsics/eoshift0.c:  Add function for kind=16 integer.
3250         * intrinsics/eoshift2.c:  Likewise.
3251         * intrinsics/cshift0.c:  Likewise.
3252
3253 2008-05-18  Thomas Koenig  <tkoenig@gcc.gnu.org>
3254
3255         * m4/in_pack.m4 (internal_pack_'rtype_code`):  Destination
3256         pointer is restrict.
3257         * m4/transpose.m4 (transpose_'rtype_code`):  Likewise.
3258         * m4/pack.m4 (pack_'rtype_code`):  Likewise.
3259         * m4/spread.m4 (spread_'rtype_code`):  Likewise.
3260         (spread_scalar_'rtype_code`): Likewise.
3261         * m4/iforeach.m4 (name`'rtype_qual`_'atype_code):  Likewise.
3262         * m4/eoshift1.m4 (eoshift1):  Likewise.
3263         * m4/eoshift3.m4 (eoshift3):  Likewise.
3264         * m4/in_unpack.m4 (internal_unpack_'rtype_ccode`):  Likewise.
3265         * m4/unpack.m4 (unpack0_'rtype_code`):  Likewise.
3266         (unpack1_'rtype_code`):  Likewise.
3267         * intrinsics/pack_generic.c (pack_generic.c):  Likewise.
3268         * intrinsics/unpack_generic.c (unpack_internal):  Likewise.
3269         * intrinsics/eoshift0.c (eoshift0):  Likewise.
3270         * intrinsics/eoshift2.c (eoshift2):  Likewise.
3271         * intrinsics/reshape_generic.c (reshape_internal):  Likewise.
3272         * intrinsics/reshape_packed.c (reshape_packed):  Likewise.
3273         * generated/eoshift1_16.c: Regenerated.
3274         * generated/eoshift1_4.c: Regenerated.
3275         * generated/eoshift1_8.c: Regenerated.
3276         * generated/eoshift3_16.c: Regenerated.
3277         * generated/eoshift3_4.c: Regenerated.
3278         * generated/eoshift3_8.c: Regenerated.
3279         * generated/in_pack_c10.c: Regenerated.
3280         * generated/in_pack_c16.c: Regenerated.
3281         * generated/in_pack_c4.c: Regenerated.
3282         * generated/in_pack_c8.c: Regenerated.
3283         * generated/in_pack_i1.c: Regenerated.
3284         * generated/in_pack_i16.c: Regenerated.
3285         * generated/in_pack_i2.c: Regenerated.
3286         * generated/in_pack_i4.c: Regenerated.
3287         * generated/in_pack_i8.c: Regenerated.
3288         * generated/in_pack_r10.c: Regenerated.
3289         * generated/in_pack_r16.c: Regenerated.
3290         * generated/in_pack_r4.c: Regenerated.
3291         * generated/in_pack_r8.c: Regenerated.
3292         * generated/in_unpack_c10.c: Regenerated.
3293         * generated/in_unpack_c16.c: Regenerated.
3294         * generated/in_unpack_c4.c: Regenerated.
3295         * generated/in_unpack_c8.c: Regenerated.
3296         * generated/in_unpack_i1.c: Regenerated.
3297         * generated/in_unpack_i16.c: Regenerated.
3298         * generated/in_unpack_i2.c: Regenerated.
3299         * generated/in_unpack_i4.c: Regenerated.
3300         * generated/in_unpack_i8.c: Regenerated.
3301         * generated/in_unpack_r10.c: Regenerated.
3302         * generated/in_unpack_r16.c: Regenerated.
3303         * generated/in_unpack_r4.c: Regenerated.
3304         * generated/in_unpack_r8.c: Regenerated.
3305         * generated/maxloc0_16_i1.c: Regenerated.
3306         * generated/maxloc0_16_i16.c: Regenerated.
3307         * generated/maxloc0_16_i2.c: Regenerated.
3308         * generated/maxloc0_16_i4.c: Regenerated.
3309         * generated/maxloc0_16_i8.c: Regenerated.
3310         * generated/maxloc0_16_r10.c: Regenerated.
3311         * generated/maxloc0_16_r16.c: Regenerated.
3312         * generated/maxloc0_16_r4.c: Regenerated.
3313         * generated/maxloc0_16_r8.c: Regenerated.
3314         * generated/maxloc0_4_i1.c: Regenerated.
3315         * generated/maxloc0_4_i16.c: Regenerated.
3316         * generated/maxloc0_4_i2.c: Regenerated.
3317         * generated/maxloc0_4_i4.c: Regenerated.
3318         * generated/maxloc0_4_i8.c: Regenerated.
3319         * generated/maxloc0_4_r10.c: Regenerated.
3320         * generated/maxloc0_4_r16.c: Regenerated.
3321         * generated/maxloc0_4_r4.c: Regenerated.
3322         * generated/maxloc0_4_r8.c: Regenerated.
3323         * generated/maxloc0_8_i1.c: Regenerated.
3324         * generated/maxloc0_8_i16.c: Regenerated.
3325         * generated/maxloc0_8_i2.c: Regenerated.
3326         * generated/maxloc0_8_i4.c: Regenerated.
3327         * generated/maxloc0_8_i8.c: Regenerated.
3328         * generated/maxloc0_8_r10.c: Regenerated.
3329         * generated/maxloc0_8_r16.c: Regenerated.
3330         * generated/maxloc0_8_r4.c: Regenerated.
3331         * generated/maxloc0_8_r8.c: Regenerated.
3332         * generated/minloc0_16_i1.c: Regenerated.
3333         * generated/minloc0_16_i16.c: Regenerated.
3334         * generated/minloc0_16_i2.c: Regenerated.
3335         * generated/minloc0_16_i4.c: Regenerated.
3336         * generated/minloc0_16_i8.c: Regenerated.
3337         * generated/minloc0_16_r10.c: Regenerated.
3338         * generated/minloc0_16_r16.c: Regenerated.
3339         * generated/minloc0_16_r4.c: Regenerated.
3340         * generated/minloc0_16_r8.c: Regenerated.
3341         * generated/minloc0_4_i1.c: Regenerated.
3342         * generated/minloc0_4_i16.c: Regenerated.
3343         * generated/minloc0_4_i2.c: Regenerated.
3344         * generated/minloc0_4_i4.c: Regenerated.
3345         * generated/minloc0_4_i8.c: Regenerated.
3346         * generated/minloc0_4_r10.c: Regenerated.
3347         * generated/minloc0_4_r16.c: Regenerated.
3348         * generated/minloc0_4_r4.c: Regenerated.
3349         * generated/minloc0_4_r8.c: Regenerated.
3350         * generated/minloc0_8_i1.c: Regenerated.
3351         * generated/minloc0_8_i16.c: Regenerated.
3352         * generated/minloc0_8_i2.c: Regenerated.
3353         * generated/minloc0_8_i4.c: Regenerated.
3354         * generated/minloc0_8_i8.c: Regenerated.
3355         * generated/minloc0_8_r10.c: Regenerated.
3356         * generated/minloc0_8_r16.c: Regenerated.
3357         * generated/minloc0_8_r4.c: Regenerated.
3358         * generated/minloc0_8_r8.c: Regenerated.
3359         * generated/pack_c10.c: Regenerated.
3360         * generated/pack_c16.c: Regenerated.
3361         * generated/pack_c4.c: Regenerated.
3362         * generated/pack_c8.c: Regenerated.
3363         * generated/pack_i1.c: Regenerated.
3364         * generated/pack_i16.c: Regenerated.
3365         * generated/pack_i2.c: Regenerated.
3366         * generated/pack_i4.c: Regenerated.
3367         * generated/pack_i8.c: Regenerated.
3368         * generated/pack_r10.c: Regenerated.
3369         * generated/pack_r16.c: Regenerated.
3370         * generated/pack_r4.c: Regenerated.
3371         * generated/pack_r8.c: Regenerated.
3372         * generated/spread_c10.c: Regenerated.
3373         * generated/spread_c16.c: Regenerated.
3374         * generated/spread_c4.c: Regenerated.
3375         * generated/spread_c8.c: Regenerated.
3376         * generated/spread_i1.c: Regenerated.
3377         * generated/spread_i16.c: Regenerated.
3378         * generated/spread_i2.c: Regenerated.
3379         * generated/spread_i4.c: Regenerated.
3380         * generated/spread_i8.c: Regenerated.
3381         * generated/spread_r10.c: Regenerated.
3382         * generated/spread_r16.c: Regenerated.
3383         * generated/spread_r4.c: Regenerated.
3384         * generated/spread_r8.c: Regenerated.
3385         * generated/transpose_c10.c: Regenerated.
3386         * generated/transpose_c16.c: Regenerated.
3387         * generated/transpose_c4.c: Regenerated.
3388         * generated/transpose_c8.c: Regenerated.
3389         * generated/transpose_i16.c: Regenerated.
3390         * generated/transpose_i4.c: Regenerated.
3391         * generated/transpose_i8.c: Regenerated.
3392         * generated/transpose_r10.c: Regenerated.
3393         * generated/transpose_r16.c: Regenerated.
3394         * generated/transpose_r4.c: Regenerated.
3395         * generated/transpose_r8.c: Regenerated.
3396         * generated/unpack_c10.c: Regenerated.
3397         * generated/unpack_c16.c: Regenerated.
3398         * generated/unpack_c4.c: Regenerated.
3399         * generated/unpack_c8.c: Regenerated.
3400         * generated/unpack_i1.c: Regenerated.
3401         * generated/unpack_i16.c: Regenerated.
3402         * generated/unpack_i2.c: Regenerated.
3403         * generated/unpack_i4.c: Regenerated.
3404         * generated/unpack_i8.c: Regenerated.
3405         * generated/unpack_r10.c: Regenerated.
3406         * generated/unpack_r16.c: Regenerated.
3407         * generated/unpack_r4.c: Regenerated.
3408         * generated/unpack_r8.c: Regenerated.
3409
3410 2008-05-18  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
3411
3412         * runtime/select.c: Moved content to select_inc.c. Include it.
3413         Add macros for different character types.
3414         * runtime/select_inc.c: New file.
3415         * runtime/convert_char.c: New file.
3416         * intrinsics/pack_generic.c (pack_char4, pack_s_char4): New
3417         functions.
3418         * intrinsics/transpose_generic.c (transpose_char4): New function.
3419         * intrinsics/spread_generic.c (spread_char4, spread_char4_scalar):
3420         New functions.
3421         * intrinsics/unpack_generic.c (unpack1_char4, unpack0_char4):
3422         New functions.
3423         * intrinsics/reshape_generic.c (reshape_char): Use
3424         gfc_charlen_type as type for length variables.
3425         (reshape_char4): New function.
3426         * gfortran.map (GFORTRAN_1.1): Add _gfortran_select_string_char4,
3427         _gfortran_convert_char1_to_char4, _gfortran_convert_char4_to_char1,
3428         _gfortran_transpose_char4, _gfortran_spread_char4,
3429         _gfortran_spread_char4_scalar, _gfortran_reshape_char4,
3430         _gfortran_pack_char4, _gfortran_pack_s_char4,
3431         _gfortran_unpack0_char4 and _gfortran_unpack1_char4.
3432         * Makefile.am: Add runtime/convert_char.c.
3433         * Makefile.in: Regenerate.
3434
3435 2008-05-17  Thomas Koenig  <tkoenig@gcc.gnu.org>
3436
3437         * io/list_read.c (list_formatted_read_scalar):  Declare
3438         type as volatile to shut up compiler warning.
3439
3440 2008-05-16  Janne Blomqvist  <jb@gcc.gnu.org>
3441
3442         PR libfortran/25561
3443         * io/io.h (struct fbuf): Change pointer to position offset.
3444         * io/fbuf.c (fbuf_init): Reduce default size of buffer, ptr=>pos
3445         changes.
3446         (fbuf_reset): ptr=>pos changes.
3447         (fbuf_alloc): If the request doesn't fit, don't waste memory by
3448         keeping flushed bytes. ptr=>pos changes.
3449         (fbuf_flush): ptr=>pos changes.
3450         (fbuf_seek): Don't seek past the left tab limit, don't update active
3451         byte count.
3452         * io/open.c (new_unit): If RECL has been specified, used that as
3453         initial buffer size.
3454
3455 2008-05-16  Janne Blomqvist  <jb@gcc.gnu.org>
3456
3457         PR libfortran/35632
3458         * io/open.c (new_unit): Set stream position to correct value.
3459
3460 2008-05-15  Janne Blomqvist  <jb@gcc.gnu.org>
3461
3462         PR libfortran/25561
3463         * Makefile.am: Add fbuf.c to gfor_io_src.
3464         * Makefile.in: Regenerate.
3465         * io/io.h (read_block): Remove.
3466         (struct stream): Remove alloc_r_at function pointer.
3467         (salloc_r): Remove.
3468         (salloc_r_at): Remove.
3469         (salloc_w_at): Remove.
3470         (salloc_w): Remove offset argument.
3471         (struct fbuf): New struct for format buffer.
3472         (struct gfc_unit): Add fbuf.
3473         (read_block_form): New prototype.
3474         (fbuf_init): Likewise.
3475         (fbuf_destroy): Likewise.
3476         (fbuf_reset): Likewise.
3477         (fbuf_alloc): Likewise.
3478         (fbuf_flush): Likewise.
3479         (fbuf_seek): Likewise.
3480         * io/file_pos.c (formatted_backspace): Change to use sread.
3481         (unformatted_backspace): Likewise.
3482         (st_backspace): Flush format buffer.
3483         (st_rewind): Likewise.
3484         * io/list_read.c (next_char): Likewise.
3485         (nml_query): Tidying, flush format buffer.
3486         * io/open.c (new_unit): Init format buffer.
3487         * io/read.c (read_l): Change to use read_block_form.
3488         (read_a): Likewise.
3489         (read_decimal): Likewise.
3490         (read_radix): Likewise.
3491         (read_f): Likewise.
3492         (read_x): Empty reads also for stream I/O.
3493         * io/transfer.c (read_sf): Change to use sread.
3494         (read_block): Rename to read_block_form, change prototype, use sread.
3495         (read_block_direct): Don't seek stream files.
3496         (write_block): Change to use fbuf if external file, don't seek stream
3497         files.
3498         (write_buf): Don't seek stream files.
3499         (formatted_transfer_scalar): Use fbuf for external files.
3500         (us_read): Change to use sread.
3501         (pre_position): Do nothing for stream I/O.
3502         (data_transfer_init): Flush fbuf when switching from write to read, if
3503         POS is specified, seek stream file to correct offset.
3504         (skip_record): Change to use sread.
3505         (min_off): New function.
3506         (next_record_r): Change to use sread.
3507         (next_record_w): Change to use sset/sseek, flush fbuf.
3508         (finalize_transfer): Flush fbuf.
3509         * io/unit.c (init_units): Init fbuf for stdout, stderr.
3510         (close_unit_1): Destroy fbuf.
3511         (finish_last_advance_record): Flush fbuf, no need to seek.
3512         * io/unix.c (fd_alloc_r_at): Remove unused where argument.
3513         (fd_alloc_w_at): Likewise.
3514         (fd_read): Remove third argument to fd_alloc_r_at.
3515         (fd_write): Remove third argument to fd_alloc_w_at.
3516         (fd_sset): Likewise.
3517         (fd_open): Don't set alloc_r_at.
3518         (mem_alloc_r_at): Remove unused where argument.
3519         (mem_alloc_w_at): Likewise.
3520         (mem_read): Don't incorrectly return previous errno, remove unused
3521         third argument to alloc function.
3522         (mem_write): Likewise.
3523         (mem_set): Likewise.
3524         (open_internal): Don't set alloc_r_at pointer.
3525         * io/fbuf.c: New file.
3526
3527 2008-05-14  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
3528
3529         * libgfortran.h (gfc_char4_t): New type.
3530         (GFC_SIZE_OF_CHAR_KIND): New macro.
3531         (compare_string): Adjust prototype.
3532         (compare_string_char4): New prototype.
3533         * gfortran.map (GFORTRAN_1.1): Add _gfortran_adjustl_char4,
3534         _gfortran_adjustr_char4, _gfortran_compare_string_char4,
3535         _gfortran_concat_string_char4, _gfortran_string_index_char4,
3536         _gfortran_string_len_trim_char4, _gfortran_string_minmax_char4,
3537         _gfortran_string_scan_char4, _gfortran_string_trim_char4 and
3538         _gfortran_string_verify_char4.
3539         * intrinsics/string_intrinsics_inc.c: New file from content of
3540         string_intrinsics.c with types replaced by macros.
3541         * intrinsics/string_intrinsics.c: Move content to
3542         string_intrinsics_inc.c.
3543
3544 2008-05-11  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
3545
3546         PR libfortran/36202
3547         * io/list_read (eat_separator): Handle the CR-LF case correctly.
3548
3549 2008-05-09  Julian Brown  <julian@codesourcery.com>
3550
3551         * Makefile.am (LTLDFLAGS): New.
3552         (libgfortran_la_LDFLAGS): Use above.
3553         * Makefile.in: Regenerate.
3554
3555 2008-05-05  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
3556
3557         PR libfortran/36131
3558         * io/transfer.c (formatted_transfer_scalar): Revert patch for PR34974.
3559         (next_record_w): Likewise.
3560
3561 2008-05-04  Thomas Koenig  <tkoenig@gcc.gnu.org>
3562
3563         PR libfortran/35995
3564         * m4/ifunction_logical.m4:  If the extent of "array"
3565         is less than zero, set it to zero.  Use an explicit
3566         flag for breaking out of the main loop to avoid, because
3567         the data pointer for "array" may be NULL for an empty
3568         array.
3569         * m4/ifunction.m4:  Likewise.
3570         * generated/all_l1.c: Regenerated.
3571         * generated/all_l16.c: Regenerated.
3572         * generated/all_l2.c: Regenerated.
3573         * generated/all_l4.c: Regenerated.
3574         * generated/all_l8.c: Regenerated.
3575         * generated/any_l1.c: Regenerated.
3576         * generated/any_l16.c: Regenerated.
3577         * generated/any_l2.c: Regenerated.
3578         * generated/any_l4.c: Regenerated.
3579         * generated/any_l8.c: Regenerated.
3580         * generated/count_16_l.c: Regenerated.
3581         * generated/count_1_l.c: Regenerated.
3582         * generated/count_2_l.c: Regenerated.
3583         * generated/count_4_l.c: Regenerated.
3584         * generated/count_8_l.c: Regenerated.
3585         * generated/maxloc1_16_i1.c: Regenerated.
3586         * generated/maxloc1_16_i16.c: Regenerated.
3587         * generated/maxloc1_16_i2.c: Regenerated.
3588         * generated/maxloc1_16_i4.c: Regenerated.
3589         * generated/maxloc1_16_i8.c: Regenerated.
3590         * generated/maxloc1_16_r10.c: Regenerated.
3591         * generated/maxloc1_16_r16.c: Regenerated.
3592         * generated/maxloc1_16_r4.c: Regenerated.
3593         * generated/maxloc1_16_r8.c: Regenerated.
3594         * generated/maxloc1_4_i1.c: Regenerated.
3595         * generated/maxloc1_4_i16.c: Regenerated.
3596         * generated/maxloc1_4_i2.c: Regenerated.
3597         * generated/maxloc1_4_i4.c: Regenerated.
3598         * generated/maxloc1_4_i8.c: Regenerated.
3599         * generated/maxloc1_4_r10.c: Regenerated.
3600         * generated/maxloc1_4_r16.c: Regenerated.
3601         * generated/maxloc1_4_r4.c: Regenerated.
3602         * generated/maxloc1_4_r8.c: Regenerated.
3603         * generated/maxloc1_8_i1.c: Regenerated.
3604         * generated/maxloc1_8_i16.c: Regenerated.
3605         * generated/maxloc1_8_i2.c: Regenerated.
3606         * generated/maxloc1_8_i4.c: Regenerated.
3607         * generated/maxloc1_8_i8.c: Regenerated.
3608         * generated/maxloc1_8_r10.c: Regenerated.
3609         * generated/maxloc1_8_r16.c: Regenerated.
3610         * generated/maxloc1_8_r4.c: Regenerated.
3611         * generated/maxloc1_8_r8.c: Regenerated.
3612         * generated/maxval_i1.c: Regenerated.
3613         * generated/maxval_i16.c: Regenerated.
3614         * generated/maxval_i2.c: Regenerated.
3615         * generated/maxval_i4.c: Regenerated.
3616         * generated/maxval_i8.c: Regenerated.
3617         * generated/maxval_r10.c: Regenerated.
3618         * generated/maxval_r16.c: Regenerated.
3619         * generated/maxval_r4.c: Regenerated.
3620         * generated/maxval_r8.c: Regenerated.
3621         * generated/minloc1_16_i1.c: Regenerated.
3622         * generated/minloc1_16_i16.c: Regenerated.
3623         * generated/minloc1_16_i2.c: Regenerated.
3624         * generated/minloc1_16_i4.c: Regenerated.
3625         * generated/minloc1_16_i8.c: Regenerated.
3626         * generated/minloc1_16_r10.c: Regenerated.
3627         * generated/minloc1_16_r16.c: Regenerated.
3628         * generated/minloc1_16_r4.c: Regenerated.
3629         * generated/minloc1_16_r8.c: Regenerated.
3630         * generated/minloc1_4_i1.c: Regenerated.
3631         * generated/minloc1_4_i16.c: Regenerated.
3632         * generated/minloc1_4_i2.c: Regenerated.
3633         * generated/minloc1_4_i4.c: Regenerated.
3634         * generated/minloc1_4_i8.c: Regenerated.
3635         * generated/minloc1_4_r10.c: Regenerated.
3636         * generated/minloc1_4_r16.c: Regenerated.
3637         * generated/minloc1_4_r4.c: Regenerated.
3638         * generated/minloc1_4_r8.c: Regenerated.
3639         * generated/minloc1_8_i1.c: Regenerated.
3640         * generated/minloc1_8_i16.c: Regenerated.
3641         * generated/minloc1_8_i2.c: Regenerated.
3642         * generated/minloc1_8_i4.c: Regenerated.
3643         * generated/minloc1_8_i8.c: Regenerated.
3644         * generated/minloc1_8_r10.c: Regenerated.
3645         * generated/minloc1_8_r16.c: Regenerated.
3646         * generated/minloc1_8_r4.c: Regenerated.
3647         * generated/minloc1_8_r8.c: Regenerated.
3648         * generated/minval_i1.c: Regenerated.
3649         * generated/minval_i16.c: Regenerated.
3650         * generated/minval_i2.c: Regenerated.
3651         * generated/minval_i4.c: Regenerated.
3652         * generated/minval_i8.c: Regenerated.
3653         * generated/minval_r10.c: Regenerated.
3654         * generated/minval_r16.c: Regenerated.
3655         * generated/minval_r4.c: Regenerated.
3656         * generated/minval_r8.c: Regenerated.
3657         * generated/product_c10.c: Regenerated.
3658         * generated/product_c16.c: Regenerated.
3659         * generated/product_c4.c: Regenerated.
3660         * generated/product_c8.c: Regenerated.
3661         * generated/product_i1.c: Regenerated.
3662         * generated/product_i16.c: Regenerated.
3663         * generated/product_i2.c: Regenerated.
3664         * generated/product_i4.c: Regenerated.
3665         * generated/product_i8.c: Regenerated.
3666         * generated/product_r10.c: Regenerated.
3667         * generated/product_r16.c: Regenerated.
3668         * generated/product_r4.c: Regenerated.
3669         * generated/product_r8.c: Regenerated.
3670         * generated/sum_c10.c: Regenerated.
3671         * generated/sum_c16.c: Regenerated.
3672         * generated/sum_c4.c: Regenerated.
3673         * generated/sum_c8.c: Regenerated.
3674         * generated/sum_i1.c: Regenerated.
3675         * generated/sum_i16.c: Regenerated.
3676         * generated/sum_i2.c: Regenerated.
3677         * generated/sum_i4.c: Regenerated.
3678         * generated/sum_i8.c: Regenerated.
3679         * generated/sum_r10.c: Regenerated.
3680         * generated/sum_r16.c: Regenerated.
3681         * generated/sum_r4.c: Regenerated.
3682         * generated/sum_r8.c: Regenerated.
3683
3684 2008-05-04  Thomas Koenig  <tkoenig@gcc.gnu.org>
3685
3686         PR libfortran/35990
3687         * intrinsics/pack_generic.c:  Really commit.
3688
3689 2008-05-04  Thomas Koenig  <tkoenig@gcc.gnu.org>
3690
3691         PR libfortran/35990
3692         * intrinsics/pack_generic.c:  If an extent of the source
3693         array is less then zero, set it to zero.  Set the source
3694         pointer to NULL if the source size is zero.  Set the total
3695         number of elements to zero if the vector has an extent
3696         less or equal to zero.
3697         * m4/pack.m4:  Set the source pointer to NULL if the
3698         source array is zero-sized.  Set the total number of
3699         elemements to zero if the vector has an extent less or
3700         equal to zero.
3701         * generated/pack_i1.c:  Regenerated.
3702         * generated/pack_i2.c:  Regenerated.
3703         * generated/pack_i4.c:  Regenerated.
3704         * generated/pack_i8.c:  Regenerated.
3705         * generated/pack_i16.c:  Regenerated.
3706         * generated/pack_r4.c:  Regenerated.
3707         * generated/pack_r8.c:  Regenerated.
3708         * generated/pack_r10.c:  Regenerated.
3709         * generated/pack_r16.c:  Regenerated.
3710         * generated/pack_c4.c:  Regenerated.
3711         * generated/pack_c8.c:  Regenerated.
3712         * generated/pack_c10.c:  Regenerated.
3713         * generated/pack_c16.c:  Regenerated.
3714
3715 2008-05-01  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
3716
3717         PR libfortran/36094
3718         * runtime/error.c (show_locus): Provide modified error message when
3719         filename has not yet been associated with a unit number.
3720         * io/open.c (encoding_opt[]): Comment out "utf-8" option and add TODO.
3721
3722 2008-04-30  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
3723
3724         * intrinsics/selected_char_kind.c: New file.
3725         * gfortran.map (GFORTRAN_1.1): Add _gfortran_selected_char_kind.
3726         * Makefile.am: Add intrinsics/selected_char_kind.c.
3727         * Makefile.in: Regenerate.
3728
3729 2008-04-30  Thomas Koenig  <tkoenig@gcc.gnu.org>
3730
3731         PR libfortran/35993
3732         * ifunction.m4 (SCALAR_ARRAY_FUNCTION):  Use correct
3733         implementation for multi-dimensional return arrays when
3734         the mask is .false.
3735         * generated/maxloc1_16_i1.c: Regenerated.
3736         * generated/maxloc1_16_i16.c: Regenerated.
3737         * generated/maxloc1_16_i2.c: Regenerated.
3738         * generated/maxloc1_16_i4.c: Regenerated.
3739         * generated/maxloc1_16_i8.c: Regenerated.
3740         * generated/maxloc1_16_r10.c: Regenerated.
3741         * generated/maxloc1_16_r16.c: Regenerated.
3742         * generated/maxloc1_16_r4.c: Regenerated.
3743         * generated/maxloc1_16_r8.c: Regenerated.
3744         * generated/maxloc1_4_i1.c: Regenerated.
3745         * generated/maxloc1_4_i16.c: Regenerated.
3746         * generated/maxloc1_4_i2.c: Regenerated.
3747         * generated/maxloc1_4_i4.c: Regenerated.
3748         * generated/maxloc1_4_i8.c: Regenerated.
3749         * generated/maxloc1_4_r10.c: Regenerated.
3750         * generated/maxloc1_4_r16.c: Regenerated.
3751         * generated/maxloc1_4_r4.c: Regenerated.
3752         * generated/maxloc1_4_r8.c: Regenerated.
3753         * generated/maxloc1_8_i1.c: Regenerated.
3754         * generated/maxloc1_8_i16.c: Regenerated.
3755         * generated/maxloc1_8_i2.c: Regenerated.
3756         * generated/maxloc1_8_i4.c: Regenerated.
3757         * generated/maxloc1_8_i8.c: Regenerated.
3758         * generated/maxloc1_8_r10.c: Regenerated.
3759         * generated/maxloc1_8_r16.c: Regenerated.
3760         * generated/maxloc1_8_r4.c: Regenerated.
3761         * generated/maxloc1_8_r8.c: Regenerated.
3762         * generated/maxval_i1.c: Regenerated.
3763         * generated/maxval_i16.c: Regenerated.
3764         * generated/maxval_i2.c: Regenerated.
3765         * generated/maxval_i4.c: Regenerated.
3766         * generated/maxval_i8.c: Regenerated.
3767         * generated/maxval_r10.c: Regenerated.
3768         * generated/maxval_r16.c: Regenerated.
3769         * generated/maxval_r4.c: Regenerated.
3770         * generated/maxval_r8.c: Regenerated.
3771         * generated/minloc1_16_i1.c: Regenerated.
3772         * generated/minloc1_16_i16.c: Regenerated.
3773         * generated/minloc1_16_i2.c: Regenerated.
3774         * generated/minloc1_16_i4.c: Regenerated.
3775         * generated/minloc1_16_i8.c: Regenerated.
3776         * generated/minloc1_16_r10.c: Regenerated.
3777         * generated/minloc1_16_r16.c: Regenerated.
3778         * generated/minloc1_16_r4.c: Regenerated.
3779         * generated/minloc1_16_r8.c: Regenerated.
3780         * generated/minloc1_4_i1.c: Regenerated.
3781         * generated/minloc1_4_i16.c: Regenerated.
3782         * generated/minloc1_4_i2.c: Regenerated.
3783         * generated/minloc1_4_i4.c: Regenerated.
3784         * generated/minloc1_4_i8.c: Regenerated.
3785         * generated/minloc1_4_r10.c: Regenerated.
3786         * generated/minloc1_4_r16.c: Regenerated.
3787         * generated/minloc1_4_r4.c: Regenerated.
3788         * generated/minloc1_4_r8.c: Regenerated.
3789         * generated/minloc1_8_i1.c: Regenerated.
3790         * generated/minloc1_8_i16.c: Regenerated.
3791         * generated/minloc1_8_i2.c: Regenerated.
3792         * generated/minloc1_8_i4.c: Regenerated.
3793         * generated/minloc1_8_i8.c: Regenerated.
3794         * generated/minloc1_8_r10.c: Regenerated.
3795         * generated/minloc1_8_r16.c: Regenerated.
3796         * generated/minloc1_8_r4.c: Regenerated.
3797         * generated/minloc1_8_r8.c: Regenerated.
3798         * generated/minval_i1.c: Regenerated.
3799         * generated/minval_i16.c: Regenerated.
3800         * generated/minval_i2.c: Regenerated.
3801         * generated/minval_i4.c: Regenerated.
3802         * generated/minval_i8.c: Regenerated.
3803         * generated/minval_r10.c: Regenerated.
3804         * generated/minval_r16.c: Regenerated.
3805         * generated/minval_r4.c: Regenerated.
3806         * generated/minval_r8.c: Regenerated.
3807         * generated/product_c10.c: Regenerated.
3808         * generated/product_c16.c: Regenerated.
3809         * generated/product_c4.c: Regenerated.
3810         * generated/product_c8.c: Regenerated.
3811         * generated/product_i1.c: Regenerated.
3812         * generated/product_i16.c: Regenerated.
3813         * generated/product_i2.c: Regenerated.
3814         * generated/product_i4.c: Regenerated.
3815         * generated/product_i8.c: Regenerated.
3816         * generated/product_r10.c: Regenerated.
3817         * generated/product_r16.c: Regenerated.
3818         * generated/product_r4.c: Regenerated.
3819         * generated/product_r8.c: Regenerated.
3820         * generated/sum_c10.c: Regenerated.
3821         * generated/sum_c16.c: Regenerated.
3822         * generated/sum_c4.c: Regenerated.
3823         * generated/sum_c8.c: Regenerated.
3824         * generated/sum_i1.c: Regenerated.
3825         * generated/sum_i16.c: Regenerated.
3826         * generated/sum_i2.c: Regenerated.
3827         * generated/sum_i4.c: Regenerated.
3828         * generated/sum_i8.c: Regenerated.
3829         * generated/sum_r10.c: Regenerated.
3830         * generated/sum_r16.c: Regenerated.
3831         * generated/sum_r4.c: Regenerated.
3832         * generated/sum_r8.c: Regenerated.
3833
3834 2008-04-25  Thomas Koenig  <tkoenig@gcc.gnu.org>
3835
3836         PR libfortran/35960
3837         * m4/reshape.m4:  Fix typo in last commit.
3838         * generated/reshape_i4.c:  Regererated.
3839         * generated/reshape_i8.c:  Regenerated.
3840         * generated/reshape_i16.c:  Regenerated.
3841         * generated/reshape_r4.c:  Regenerated.
3842         * generated/reshape_r8.c:  Regenerated.
3843         * generated/reshape_r10.c:  Regenerated.
3844         * generated/reshape_r16.c:  Regenerated.
3845         * generated/reshape_c4.c:  Regenerated.
3846         * generated/reshape_c8.c:  Regenerated.
3847         * generated/reshape_c10.c:  Regenerated.
3848         * generated/reshape_c16.c:  Regenerated.
3849
3850 2008-04-24  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
3851
3852         * intrinsics/time_1.h (__time_1): Remove unused variable.
3853
3854 2008-04-23  Thomas Koenig  <tkoenig@gcc.gnu.org>
3855
3856         PR libfortran/35988
3857         * m4/matmul.m4:  Only issue a runtime error if extents are
3858         non-zero.
3859         * generated/matmul_i1.c:  Regenerated.
3860         * generated/matmul_i2.c:  Regenerated.
3861         * generated/matmul_i4.c:  Regenerated.
3862         * generated/matmul_i8.c:  Regenerated.
3863         * generated/matmul_i16.c:  Regenerated.
3864         * generated/matmul_r4.c:  Regenerated.
3865         * generated/matmul_r8.c:  Regenerated.
3866         * generated/matmul_r10.c:  Regenerated.
3867         * generated/matmul_r16.c:  Regenerated.
3868         * generated/matmul_c4.c:  Regenerated.
3869         * generated/matmul_c8.c:  Regenerated.
3870         * generated/matmul_c10.c:  Regenerated.
3871         * generated/matmul_c16.c:  Regenerated.
3872
3873 2008-04-21  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
3874
3875         * acinclude.m4 (LIBGFOR_CHECK_ATTRIBUTE_VISIBILITY)
3876         (LIBGFOR_CHECK_ATTRIBUTE_DLLEXPORT)
3877         (LIBGFOR_CHECK_ATTRIBUTE_ALIAS, LIBGFOR_CHECK_SYNC_FETCH_AND_ADD)
3878         (LIBGFOR_GTHREAD_WEAK, LIBGFOR_CHECK_UNLINK_OPEN_FILE)
3879         (LIBGFOR_CHECK_CRLF, LIBGFOR_CHECK_FOR_BROKEN_ISFINITE)
3880         (LIBGFOR_CHECK_FOR_BROKEN_ISNAN)
3881         (LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY, LIBGFOR_CHECK_WORKING_STAT)
3882         (LIBGFOR_CHECK_FPSETMASK, LIBGFOR_CHECK_MINGW_SNPRINTF):
3883         Fix cache variable names.
3884         * configure, Makefile.in: Regenerate.
3885
3886 2008-04-20  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
3887
3888         PR fortran/35991
3889         * intrinsics/cshift0.c (cshift0): Avoid divide by zero.
3890
3891 2008-04-20  Thomas Koenig  <tkoenig@gcc.gnu.org>
3892
3893         PR libfortran/35960
3894         * intrinsics/reshape_generic.c (reshape_internal): If the size
3895         of the resized array is zero, as determined by the SHAPE
3896         argument, return early.
3897         * m4/reshape.m4:  Likewise.
3898         * generated/reshape_i4.c:  Regererated.
3899         * generated/reshape_i8.c:  Regenerated.
3900         * generated/reshape_i16.c:  Regenerated.
3901         * generated/reshape_r4.c:  Regenerated.
3902         * generated/reshape_r8.c:  Regenerated.
3903         * generated/reshape_r10.c:  Regenerated.
3904         * generated/reshape_r16.c:  Regenerated.
3905         * generated/reshape_c4.c:  Regenerated.
3906         * generated/reshape_c8.c:  Regenerated.
3907         * generated/reshape_c10.c:  Regenerated.
3908         * generated/reshape_c16.c:  Regenerated.
3909
3910 2008-04-18  Paolo Bonzini  <bonzini@gnu.org>
3911
3912         PR bootstrap/35457
3913         * aclocal.m4: Regenerate.
3914         * configure: Regenerate.
3915
3916 2008-04-14  Thomas Koenig  <tkoenig@gcc.gnu.org>
3917
3918         PR libfortran/32972
3919         * intrinsics/spread_generic.c (spread):  Use spread_i2()
3920         for GFC_DTYPE_DERIVED_2 (fix typo from previous commit).
3921
3922 2008-04-13  Thomas Koenig  <tkoenig@gcc.gnu.org>
3923         Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
3924
3925         PR libfortran/32972
3926         PR libfortran/32512
3927         configure.ac:  Add test for uintptr_t.
3928         configure:  Regenerated.
3929         config.h.in:  Regenerated.
3930         * libgfortran.h: GFC_DTYPE_DERIVED_1:  New macro.
3931         GFC_DTYPE_DERIVED_2:  New macro.
3932         GFC_DTYPE_DERIVED_4:  New macro.
3933         GFC_DTYPE_DERIVED_8:  New macro.
3934         GFC_DTYPE_DERIVED_16:  New macro.
3935         GFC_UNALIGNED_2:  New macro.
3936         GFC_UNALIGNED_4:  New macro.
3937         GFC_UNALIGNED_8:  New macro.
3938         GFC_UNALIGNED_16:  New macro.
3939         intptr_t:  Define if we don't have it.
3940         uintptr_t:  Likewise.
3941         * runtime/backtrace.c (show_backtrace):  Use intptr_t.
3942         * intrinsics/signal.c (signal_sub):  Likewise.
3943         (signal_sub_int):  Likewise.
3944         (alarm_sub_int_i4):  Likewise.
3945         * intrinsics/spread_generic.c (spread):  Use the integer
3946         routines for handling derived types of sizes 1, 2, 4, 8 and 16
3947         if the alignment of all pointers is correct.
3948         (spread_scalar):  Likewise.
3949         * intrinsics/pack_generic.c (pack):  Likewise.
3950         Use GFD_DTYPE_TYPE_SIZE to avoid nested switch statements.
3951         * intrinsics/unpack_generic.c (unpack1):  Likewise.
3952         (unpack0):  Likewise.
3953         * runtime/in_pack_generic.c (internal_pack):  Likewise.
3954         * runtime/in_unpack_generic.c (internal_unpack):  Likewise.
3955
3956 2008-04-09  Jakub Jelinek  <jakub@redhat.com>
3957
3958         * io/list_read.c (snprintf): Define if HAVE_SNPRINTF isn't defined.
3959         (nml_read_obj): Add nml_err_msg_size argument.  Pass it down to
3960         recursive call.  Use snprintf instead of sprintf when %s nl->var_name
3961         is used.
3962         (nml_get_obj_data): Add nml_err_msg_size argument.  Pass it down to
3963         nml_read_obj call.  Use snprintf instead of sprintf when %s
3964         nl->var_name is used.  Pass nml_err_msg to nml_parse_qualifier instead
3965         of parse_err_msg array.  Append " for namelist variable " and
3966         nl->var_name to it.
3967         (namelist_read): Increase size of nml_err_msg array to 200.  Pass
3968         sizeof nml_err_msg as extra argument to nml_get_obj_data.
3969
3970 2008-04-07  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
3971
3972         PR fortran/25829 28655
3973         * io/open.c (edit_modes): Set flags.async. (new_unit) Set flags.async
3974         and flags.status. (st_open): Initialize flags.async.
3975         * io/list_read.c (read_charactor): Use delim_status instead of
3976         flags.delim.
3977         * io/read.c (read_x): Use pad_status instead of flags.pad.
3978         * io/inquire.c (inquire_via_unit): Add new checks.
3979         (inquire_via_filename): Likewise.
3980         * io/io.h (st_parameter_inquire): Add new flags.
3981         (st_parameter_dt): Likewise.
3982         * io/unit.c (get_internal_unit): Set flags.async. (init_units): Set
3983         flags.async.
3984         * io/transfer.c: Add delim and pad option arrays. (read_sf): Use
3985         pad_status instead of flags.pad. (read_block): Likewise.
3986         (data_transfer_init): Set flags.async and add checks.
3987         * io/write.c (write_character): Use delim_status.
3988         (list_formatted_write_scalar): Likewise. (nml_write_obj): Likewise.
3989         (namelist_write): Likewise.
3990
3991 2008-04-05  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
3992
3993         PR fortran/25829 28655
3994         * gfortran.map: Add new symbol, _gfortran_st_wait.
3995         * libgfortran.h (st_paramter_common): Add new I/O parameters.
3996         * open.c (st_option decimal_opt[], st_option encoding_opt[],
3997         st_option round_opt[], st_option sign_opt[], st_option async_opt[]): New
3998         parameter option arrays. (edit_modes): Add checks for new parameters.
3999         (new_unit): Likewise. (st_open): Likewise.
4000         * list_read.c (CASE_SEPERATORS): Add ';' as a valid separator.
4001         (eat_separator): Handle deimal comma. (read_logical): Fix whitespace.
4002         (parse_real): Handle decimal comma. (read_real): Handle decimal comma.
4003         * read.c (read_a): Use decimal status flag to allow comma in place of a
4004         decimal point. (read_f): Allow comma as acceptable character in float.
4005         According to decimal flag, substitute a period for a comma.
4006         (read_x): If decimal status flag is comma, disable the read_comma flag,
4007         not allowing comma as a delimiter, an extension otherwise.
4008         * io.h: (unit_decimal, unit_encoding, unit_round, unit_sign,
4009         unit_async): New enumerators. Add all new I/O parameters.
4010         * unix.c (unix_stream, int_stream): Add io_mode asychronous I/O control.
4011         (move_pos_offset, fd_alloc_w_at): Fix some whitespace.
4012         (fd_sfree): Use new enumerator. (fd_read): Likewise.
4013         (fd_write): Likewise. (fd_close): Fix whitespace.
4014         (fd_open): Use new enumertors. (tempfile, regular_file,
4015         open_external): Fix whitespace. (output_stream, error_stream): Set
4016         method. (stream_offset): Fix whitespace.
4017         * transfer.c: (st_option decimal_opt[], sign_opt[], blank_opt[]): New
4018         option arrays.  (formatted_transfer_scalar): Set sf_read_comma flag
4019         based on new decimal_status flag. (data_transfer_init): Initialize new
4020         parameters. Add checks for decimal, sign, and blank. (st_wait): New stub.
4021         * format.c: (format_lex): Add format specifiers DP, DC, and D.
4022         (parse_format_list): Parse the new specifiers.
4023         * write.c (write_decimal): Use new sign enumerators to set the sign.
4024         (write_complex): Handle decimal comma and semi-colon separator.
4025         (nml_write_obj): Likewise.
4026         * write_float.def: Revise sign enumerators. (calculate_sign): Use new
4027         sign enumerators. (output_float): Likewise. Use new decimal_status flag
4028         to set the decimal character to a point or a comma.
4029
4030 2008-03-28  Thomas Koenig  <tkoenig@gcc.gnu.org>
4031
4032         PR libfortran/32972
4033         PR libfortran/32512
4034         * Makefile.am:  Add new variable, i_spread_c, containing
4035         pack_i1.c, pack_i2.c, pack_i4.c, pack_i8.c, spread_i16.c,
4036         spread_r4.c, spread_r8.c, spread_r10.c, spread_r16.c,
4037         spread_c4.c, spread_c8.c, spread_c10.c, spread_c16.c.
4038         * Makefile.in:  Regenerated.
4039         * libgfortran.h:  Add prototypes for spread_i1, spread_i2,
4040         spread_i4, spread_i8, spread_i16, spread_r4, spread_r8,
4041         spread_c4, spread_c8, spread_c10, spread_c16,
4042         spread_scalar_i1, spread_scalar_i2, spread_scalar_i4,
4043         spread_scalar_i8, spread_scalar_i16, spread_scalar_r4
4044         spread_scalar_r8, spread_scalar_c4, spread_scalar_c8,
4045         spread_scalar_c10 and spread_scalar_c16.
4046         Add macros to isolate both type and size information
4047         from array descriptors with a single mask operation.
4048         * intrinsics/spread_generic.c:  Add calls to specific
4049         spread functions.
4050         * m4/spread.m4:  New file.
4051         * generated/spread_i1.c:  New file.
4052         * generated/spread_i2.c:  New file.
4053         * generated/spread_i4.c:  New file.
4054         * generated/spread_i8.c:  New file.
4055         * generated/spread_i16.c:  New file.
4056         * generated/spread_r4.c:  New file.
4057         * generated/spread_r8.c:  New file.
4058         * generated/spread_r10.c:  New file.
4059         * generated/spread_r16.c:  New file.
4060         * generated/spread_c4.c:  New file.
4061         * generated/spread_c8.c:  New file.
4062         * generated/spread_c10.c:  New file.
4063         * generated/spread_c16.c:  New file.
4064
4065 2008-03-28  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
4066
4067         PR libfortran/35699
4068         * io/transfer.c (write_buf):  Don't pad the record, just return if the
4069         data is NULL.  (next_record_w): If there are bytes left in the record
4070         for unformatted direct I/O, pad out the record with zero bytes.
4071
4072 2008-03-28  Tobias Burnus  <burnus@net-b.de>
4073
4074         PR fortran/35721
4075         * intrinsics/associated.c (associated): Ignore different
4076         stride of pointer vs. target if only one element is referred.
4077
4078 2008-03-26  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
4079
4080         * io/unix.c (fd_close):  Do not close STDIN.
4081
4082 2007-03-23  Thomas Koenig  <tkoenig@gcc.gnu.org
4083
4084         PR libfortran/32972
4085         * Makefile.am:  Add new variable, i_unpack_c, containing
4086         unpack_i1.c, unpack_i2.c, unpack_i4.c, unpack_i8.c,
4087         unpack_i16.c, unpack_r4.c, unpack_r8.c, unpack_r10.c,
4088         unpack_r16.c, unpack_c4.c, unpack_c8.c, unpack_c10.c
4089         and unpack_c16.c
4090         Add i_unpack_c to gfor_built_src.
4091         Add rule to generate i_unpack_c from m4/unpack.m4.
4092         * Makefile.in:  Regenerated.
4093         * libgfortran.h: Add prototypes for unpack0_i1, unpack0_i2,
4094         unpack0_i4, unpack0_i8, unpack0_i16, unpack0_r4, unpack0_r8,
4095         unpack0_r10, unpack0_r16, unpack0_c4, unpack0_c8, unpack0_c10,
4096         unpack0_c16, unpack1_i1, unpack1_i2, unpack1_i4, unpack1_i8,
4097         unpack1_i16, unpack1_r4, unpack1_r8, unpack1_r10, unpack1_r16,
4098         unpack1_c4, unpack1_c8, unpack1_c10 and unpack1_c16.
4099         * intrinsics/pack_generic.c (unpack1):  Add calls to specific
4100         unpack1 functions.
4101         (unpack0):  Add calls to specific unpack0 functions.
4102         * m4/unpack.m4:  New file.
4103         * generated/unpack_i1.c:  New file.
4104         * generated/unpack_i2.c:  New file.
4105         * generated/unpack_i4.c:  New file.
4106         * generated/unpack_i8.c:  New file.
4107         * generated/unpack_i16.c:  New file.
4108         * generated/unpack_r4.c:  New file.
4109         * generated/unpack_r8.c:  New file.
4110         * generated/unpack_r10.c:  New file.
4111         * generated/unpack_r16.c:  New file.
4112         * generated/unpack_c4.c:  New file.
4113         * generated/unpack_c8.c:  New file.
4114         * generated/unpack_c10.c:  New file.
4115         * generated/unpack_c16.c:  New file.
4116
4117 2008-03-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
4118
4119         PR libfortran/35632
4120         * io/transfer.c (data_transfer_init):  Fix whitespace.
4121         (next_record_w): Truncate the file only if the stream
4122         position is short of the file end.
4123
4124 2008-03-21  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
4125
4126         * intrinsics/pack_generic.c:  Fix typo.
4127
4128 2008-03-21  Janne Blomqvist  <jb@gcc.gnu.org>
4129
4130         * gfortran.map: Move erfc_scaled symbols to new symbol node
4131         GFORTRAN_1.1, thereby fixing ABI bug introduced in r132846.
4132
4133 2008-03-21  Thomas Koenig  <tkoenig@gcc.gnu.org>
4134
4135         PR libfortran/32972
4136         * runtime/in_pack_generic.c (internal_pack):  Call correct
4137         function, pack_i16, for GFC_INTEGER_16.
4138
4139 2008-03-21  Thomas Koenig  <tkoenig@gcc.gnu.org>
4140
4141         PR libfortran/32972
4142         * Makefile.am:  Add new variable, i_pack_c, containing
4143         pack_i1.c, pack_i2.c, pack_i4.c, pack_i8.c, pack_i16.c,
4144         pack_r4.c, pack_r8.c, pack_r10.c, pack_r16.c, pack_c4.c,
4145         pack_c8.c, pack_c10.c, pack_c16.c.
4146         Add m4/pack.m4 to m4_files.
4147         Add i_pack_c to gfor_built_src.
4148         Add rule to generate i_pack_c from m4/pack.m4.
4149         * Makefile.in:  Regenerated.
4150         * libgfortran.h: Add prototypes for pack_i1, pack_i2, pack_i4,
4151         pack_i8, pack_i16, pack_r4, pack_r8, pack_c4, pack_c8,
4152         pack_c10, pack_c16.
4153         * intrinsics/pack_generic.c:  Add calls to specific
4154         pack functions.
4155         * m4/pack.m4:  New file.
4156         * generated/pack_i1.c:  New file.
4157         * generated/pack_i2.c:  New file.
4158         * generated/pack_i4.c:  New file.
4159         * generated/pack_i8.c:  New file.
4160         * generated/pack_i16.c:  New file.
4161         * generated/pack_r4.c:  New file.
4162         * generated/pack_r8.c:  New file.
4163         * generated/pack_r10.c:  New file.
4164         * generated/pack_r16.c:  New file.
4165         * generated/pack_c4.c:  New file.
4166         * generated/pack_c8.c:  New file.
4167         * generated/pack_c10.c:  New file.
4168         * generated/pack_c16.c:  New file.
4169
4170 2008-03-19  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
4171
4172         PR libfortran/35627
4173         * io/list_read.c (free_line): Clear the line buffer enable flag and
4174         reset the index into line_buffer, aka item_count.
4175         (next_char): Cleanup whitespace.
4176         (read_logical): Use unget_char to assure that the first character of the
4177         bad logical is saved in case it is part of an object name. Remove the
4178         clearing of index and flag that is now in free_line.
4179         (read_real): Likewise.
4180
4181 2008-03-19  Thomas Koenig  <tkoenig@gcc.gnu.org>
4182
4183         PR libfortran/32972
4184         * runtime/in_pack_generic.c (internal_pack):  Fix typo in
4185         last commit.
4186
4187 2008-03-19  Thomas Koenig  <tkoenig@gcc.gnu.org>
4188
4189         PR libfortran/32972
4190         * Makefile.am (in_pack_c): Add in_pack_i1.c, in_pack_i2.c,
4191         in_pack_r4.c, in_pack_r8.c, in_pack_r10.c and in_pack_r16.c.
4192         (in_unpack_c): Add in_unpack_i1.c, in_unpack_i2.c,
4193         in_unpack_r4.c, in_unpack_r8.c, in_unpack_r10.c and
4194         in_unpack_r16.c.
4195         * Makefile.in: Regenerate.
4196         * libgfortran.h:  Add prototypes for internal_pack_1,
4197         internal_pack_2, internal_pack_16, internal_pack_r4,
4198         internal_pack_r8, internal_pack_r10, internal_pack_r16,
4199         internal_pack_c10 and internal_pack_c16.  Add prototypes for
4200         internal_unpack_1, internal_unpack_2, internal_unpack_16,
4201         internal_unpack_r4, internal_unpack_r8, internal_unpack_r10,
4202         internal_unpack_r16, internal_unpack_c10 and
4203         internal_unpack_c16.
4204         * runtime/in_pack_generic.c (internal_pack): Use sizeof instead
4205         of hardwired sizes.
4206         Add calls to internal_pack_1, internal_pack_2,
4207         internal_pack_16, internal_pack_r4, internal_pack_r8,
4208         internal_pack_r10, internal_pack_r16, internal_pack_c10 and
4209         internal_pack_c16.
4210         * runtime/in_unpack_generic.c (internal_unpack):  Use sizeof
4211         instead of hardwired sizes.
4212         Add calls to internal_unpack_1, internal_unpack_2,
4213         internal_unpack_16, internal_unpack_r4, internal_unpack_r8,
4214         internal_unpack_r10, internal_unpack_r16, internal_unpack_c10
4215         and internal_unpack_c16.
4216         * generated/in_pack_r4.c:  New file.
4217         * generated/in_pack_i2.c:  New file.
4218         * generated/in_unpack_i1.c:  New file.
4219         * generated/in_pack_r10.c:  New file.
4220         * generated/in_unpack_r4.c:  New file.
4221         * generated/in_unpack_i2.c:  New file.
4222         * generated/in_unpack_r16.c:  New file.
4223         * generated/in_pack_r8.c:  New file.
4224         * generated/in_unpack_r10.c:  New file.
4225         * generated/in_unpack_r8.c:  New file.
4226         * generated/in_pack_r16.c:  New file.
4227         * generated/in_pack_i1.c:  New file.
4228
4229 2008-03-17  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
4230
4231         PR libfortran/35617
4232         * io/list_read.c (eat_separator): If next character after eatline is '!'
4233         then eatline again.
4234
4235 2008-03-16  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
4236
4237         * aclocal.m4: Regenerate.
4238         * configure: Likewise.
4239         * Makefile.in: Likewise.
4240
4241 2008-03-12  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
4242
4243         PR libfortran/35524
4244         * intrinsics/erfc_scaled_inc.c: Only define the long double
4245         variant of erfc_scaled if expl is available.
4246
4247 2008-03-11  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
4248
4249         PR libfortran/32812
4250         * intrinsics/random.c (scramble_seed, unscramble_seed): New
4251         functions.
4252         (random_seed_i4): Scramble the seed the user gives us before
4253         storing it, and unscramble it when we return it back later.
4254
4255 2008-03-05  Hans-Peter Nilsson  <hp@axis.com>
4256
4257         PR libfortran/35293
4258         * io/unix.c (fd_truncate): Fold s->special_file case into
4259         success case of ftruncate/chsize call instead of the failure case.
4260         Make failure case actually return failure.  Properly update stream
4261         pointers on failure.  Call runtime_error for targets without
4262         neither ftruncate nor chsize where such a call would be needed.
4263
4264 2008-03-03  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
4265
4266         PR fortran/33197
4267         * intrinsics/erfc_scaled_inc.c: New file.
4268         * intrinsics/erfc_scaled.c: New file.
4269         * gfortran.map (GFORTRAN_1.0): Add _gfortran_erfc_scaled_r*.
4270         * Makefile.am: Add intrinsics/erfc_scaled.c.
4271         * config.h.in: Regenerate.
4272         * configure: Regenerate.
4273         * Makefile.in: Regenerate.
4274
4275 2008-03-01  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
4276
4277         PR libfortran/35355
4278         * intrinsics/time_1.h (__time_1): Fix calculation of user_usec
4279         for mingw.
4280
4281 2008-03-01  Janne Blomqvist  <jb@gcc.gnu.org>
4282
4283         PR libfortran/35063
4284         * io/unit.c (destroy_unit_mutex): Call __gthread_mutex_destroy
4285         instead of macro kludge.
4286
4287 2008-02-25  Janne Blomqvist  <jb@gcc.gnu.org>
4288
4289         PR fortran/29549
4290         * Makefile.am: Add -fcx-fortran-rules to AM_CFLAGS for all of
4291         libgfortran.
4292         * Makefile.in: Regenerated.
4293
4294 2008-02-25  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
4295
4296         * m4/ifunction_logical.m4: Add casts to get rid of warnings.
4297         * generated/all_l1.c: Regenerate.
4298         * generated/all_l2.c: Regenerate.
4299         * generated/all_l4.c: Regenerate.
4300         * generated/all_l8.c: Regenerate.
4301         * generated/all_l16.c: Regenerate.
4302         * generated/any_l1.c: Regenerate.
4303         * generated/any_l2.c: Regenerate.
4304         * generated/any_l4.c: Regenerate.
4305         * generated/any_l8.c: Regenerate.
4306         * generated/any_l16.c: Regenerate.
4307         * generated/count_1_l.c: Regenerate.
4308         * generated/count_2_l.c: Regenerate.
4309         * generated/count_4_l.c: Regenerate.
4310         * generated/count_8_l.c: Regenerate.
4311         * generated/count_16_l.c: Regenerate.
4312
4313 2008-02-24  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
4314
4315         PR libfortran/32841
4316         * acinclude.m4: Don't use HAVE_MATH_H.
4317         * configure: Regenerate.
4318
4319 2008-02-20  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
4320
4321         PR libfortran/35132
4322         * io/transfer.c (next_record_w): Truncate after the last record for
4323         STREAM I/O.
4324
4325         PR libfortran/34954
4326         * io/transfer.c (data_transfer_init): Initialize dtp->rec if writing.
4327
4328         PR libfortran/34974
4329         * io/transfer.c (formatted_transfer_scalar): Flush the buffer if skips
4330         is less than zero. (next_record_w): Use sseek to position the file to
4331         the max position reached.
4332
4333 2008-02-20  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
4334
4335         PR libfortran/35036
4336         * write_float.def (output_float):  Add error checks for zero digits
4337         after decimal point in E and D format specifiers.
4338
4339 2008-02-10  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
4340
4341         PR libfortran/35063
4342         * io/unit.c (destroy_unit_mutex): New function that uses
4343         __gthread_mutex_destroy_function or pthread_mutex_destroy after
4344         unlocking and before free_mem for final closure of I/O unit.
4345         (delete_root): Use new function.
4346         (free_internal_unit): Likewise.
4347         (close_unit_1): Likewise.
4348
4349 2008-02-02  Thomas Koenig  <tkoenig@gcc.gnu.org>
4350
4351         PR libfortran/35001
4352         * m4/shape.m4:  Return 0 for extents <= 0.
4353         * generated/shape_i4.c:  Regenerated.
4354         * generated/shape_i8.c:  Regenerated.
4355         * generated/shape_i16.c:  Regenerated.
4356
4357 2008-01-27  Thomas Koenig  <tkoenig@gcc.gnu.org>
4358
4359         PR libfortran/34980
4360         * m4/shape.m4:  If return array is empty, return early.
4361         * generated/shape_i4.c:  Regenerated.
4362         * generated/shape_i8.c:  Regenerated.
4363         * generated/shape_i16.c:  Regenerated.
4364
4365 2008-01-26  Thomas Koenig  <tkoenig@gcc.gnu.org>
4366
4367         PR libfofortran/34887
4368         * io/transfer.c (next_record_w): Always move to the farthest
4369         position when completing the record (also when we are
4370         processing a slash edit descriptor).
4371
4372 2008-01-25  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
4373
4374         PR libfortran/34876
4375         * io/transfer.c (write_buf): Handle case of zero sized array.
4376         (transfer_array): Set data pointer to NULL and size to zero.  Then
4377         make a data transfer and return.
4378
4379 2008-01-24  David Edelsohn  <edelsohn@gnu.org>
4380
4381         * configure: Regenerate.
4382
4383 2008-01-19  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
4384
4385         PR libfortran/34795
4386         * io/inquire.c (inquire_via_unit): If a unit is opened, return values
4387         according to the open action for DIRECT, FORMATTED, and UNFORMATTED.
4388         (inquire_via_filename): Return "UNKNOWN" for SEQUENTIAL, DIRECT,
4389         FORAMATTED, and UNFORMATTED inquiries.
4390         * io/unix.c (inquire_sequential): Return "UNKNOWN" when appropriate
4391         for files that are not opened. (inquire_direct): Same.
4392         (inquire_formatted): Same.
4393
4394 2008-01-18  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
4395
4396         PR libfortran/34782
4397         * io/transfer.c (formatted_transfer_scalar): Set max_pos to the greater
4398         of the current max_pos or the newly calculated position.
4399
4400 2008-01-18  Tobias Burnus  <burnus@net-b.de>
4401
4402         * io/write.c (write_real): Increase default precision
4403         for REAL(16) by one.
4404
4405 2008-01-16  Steven Bosscher  <steven@gcc.gnu.org>
4406
4407         PR libfortran/34669
4408         * mk-kinds-h.sh: Compile with -S to avoid calling the assembler,
4409         to avoid piping the -fdump-parse-tree output to the assembler
4410         when configuring with -pipe.
4411         * mk-sik-inc.sh: Likewise.
4412         * mk-srk-inc.sh: Likewise.
4413
4414 2008-01-15  Thomas Koenig  <tkoenig@gcc.gnu.org>
4415
4416         PR libfortran/34671
4417         * gfortran.am: Added _gfortran_all_l1, _gfortran_all_l2,
4418         _gfortran_any_l1, _gfortran_any_l2, -28,15 _gfortran_count_1_l,
4419         _gfortran_count_16_l, _gfortran_count_2_l, _gfortran_count_4_l and
4420         _gfortran_count_8_l Removed _gfortran_count_16_l16,
4421         _gfortran_count_16_l4, _gfortran_count_16_l8,
4422         _gfortran_count_4_l16, _gfortran_count_4_l4, _gfortran_count_4_l8,
4423         _gfortran_count_8_l16, _gfortran_count_8_l4 and
4424         _gfortran_count_8_l8.
4425         * Makefile.am: Added generated/any_l1.c and generated/any_l2.c to
4426         i_any_c.  Added generated/all_l1. and generated/all_l2.c to
4427         i_all_c.  Removed generated/count_4_l4.c, generated/count_8_l4.c,
4428         generated/count_16_l4.c, generated/count_4_l8.c,
4429         generated/count_8_l8.c, generated/count_16_l8.c,
4430         generated/count_4_l16.c, generated/count_8_l16.c, and
4431         generated/count_16_l16.c from i_count_c.  Added count_1_l.c,
4432         count_2_l.c, count_4_l.c, count_8_l.c and count_16_l.c to
4433         i_count_c.  I_M4_DEPS2 depends on ifunction_logical.m4, for
4434         any of the files generated from all.m4, any.m4 and count.m4.
4435         * Makefile.in:  Regenerated.
4436         * m4/ifunction_logical.m4:  New file.  Use
4437         GFC_LOGICAL_1 pointer for access to source arrays.
4438         * m4/any.m4:  Include ifunction_logical.m4 instead of
4439         ifunction.m4.  Don't check atype_name.
4440         * m4/all.m4:  Likewise.
4441         * m4/count.m4:  Likewise.
4442         * generated/any_l1.c:  New file.
4443         * generated/any_l2.c:  New file.
4444         * generated/all_l1.c:  New file.
4445         * generated/count_1_l.c:  New file.
4446         * generated/count_2_l.c:  New file.
4447         * generated/count_4_l.c:  New file.
4448         * generated/count_8_l.c:  New file.
4449         * generated/count_16_l.c:  New file.
4450         * generated/any_l4.c:  Regenerated.
4451         * generated/any_l8.c:  Regenerated.
4452         * generated/any_l16.c:  Regenerated.
4453         * generated/all_l4.c: Regenerated.
4454         * generated/all_l8.c: Regenerated.
4455         * generated/all_l16.c: Regenerated.
4456         * generated/count_4_l4.c:  Removed.
4457         * generated/count_4_l8.c:  Removed.
4458         * generated/count_4_l16.c:  Removed.
4459         * generated/count_8_l4.c:  Removed.
4460         * generated/count_8_l8.c:  Removed.
4461         * generated/count_8_l16.c:  Removed.
4462         * generated/count_16_l4.c:  Removed.
4463         * generated/count_16_l8.c:  Removed.
4464         * generated/count_16_l16.c:  Removed.
4465
4466 2008-01-13  Thomas Koenig  <tkoenig@gcc.gnu.org>
4467
4468         PR libfortran/34746
4469         * m4/iforeach.m4 (name`'rtype_qual`_'atype_code):  Use %ld
4470         in printf format for all bounds checking; cast all
4471         integer-like arguments to runtime_error() to long int.
4472         (`m'name`'rtype_qual`_'atype_code):  Likewise.
4473         (`s'name`'rtype_qual`_'atype_code):  Likewise.
4474         * m4/ifunction.m4 (name`'rtype_qual`_'atype_code):  Likewise.
4475         (`m'name`'rtype_qual`_'atype_code):  Likewise.
4476         (`s'name`'rtype_qual`_'atype_code):  Likewise.
4477         * generated/all_l16.c: Regenerated.
4478         * generated/all_l4.c: Regenerated.
4479         * generated/all_l8.c: Regenerated.
4480         * generated/any_l16.c: Regenerated.
4481         * generated/any_l4.c: Regenerated.
4482         * generated/any_l8.c: Regenerated.
4483         * generated/count_16_l16.c: Regenerated.
4484         * generated/count_16_l4.c: Regenerated.
4485         * generated/count_16_l8.c: Regenerated.
4486         * generated/count_4_l16.c: Regenerated.
4487         * generated/count_4_l4.c: Regenerated.
4488         * generated/count_4_l8.c: Regenerated.
4489         * generated/count_8_l16.c: Regenerated.
4490         * generated/count_8_l4.c: Regenerated.
4491         * generated/count_8_l8.c: Regenerated.
4492         * generated/maxloc0_16_i1.c: Regenerated.
4493         * generated/maxloc0_16_i16.c: Regenerated.
4494         * generated/maxloc0_16_i2.c: Regenerated.
4495         * generated/maxloc0_16_i4.c: Regenerated.
4496         * generated/maxloc0_16_i8.c: Regenerated.
4497         * generated/maxloc0_16_r10.c: Regenerated.
4498         * generated/maxloc0_16_r16.c: Regenerated.
4499         * generated/maxloc0_16_r4.c: Regenerated.
4500         * generated/maxloc0_16_r8.c: Regenerated.
4501         * generated/maxloc0_4_i1.c: Regenerated.
4502         * generated/maxloc0_4_i16.c: Regenerated.
4503         * generated/maxloc0_4_i2.c: Regenerated.
4504         * generated/maxloc0_4_i4.c: Regenerated.
4505         * generated/maxloc0_4_i8.c: Regenerated.
4506         * generated/maxloc0_4_r10.c: Regenerated.
4507         * generated/maxloc0_4_r16.c: Regenerated.
4508         * generated/maxloc0_4_r4.c: Regenerated.
4509         * generated/maxloc0_4_r8.c: Regenerated.
4510         * generated/maxloc0_8_i1.c: Regenerated.
4511         * generated/maxloc0_8_i16.c: Regenerated.
4512         * generated/maxloc0_8_i2.c: Regenerated.
4513         * generated/maxloc0_8_i4.c: Regenerated.
4514         * generated/maxloc0_8_i8.c: Regenerated.
4515         * generated/maxloc0_8_r10.c: Regenerated.
4516         * generated/maxloc0_8_r16.c: Regenerated.
4517         * generated/maxloc0_8_r4.c: Regenerated.
4518         * generated/maxloc0_8_r8.c: Regenerated.
4519         * generated/maxloc1_16_i1.c: Regenerated.
4520         * generated/maxloc1_16_i16.c: Regenerated.
4521         * generated/maxloc1_16_i2.c: Regenerated.
4522         * generated/maxloc1_16_i4.c: Regenerated.
4523         * generated/maxloc1_16_i8.c: Regenerated.
4524         * generated/maxloc1_16_r10.c: Regenerated.
4525         * generated/maxloc1_16_r16.c: Regenerated.
4526         * generated/maxloc1_16_r4.c: Regenerated.
4527         * generated/maxloc1_16_r8.c: Regenerated.
4528         * generated/maxloc1_4_i1.c: Regenerated.
4529         * generated/maxloc1_4_i16.c: Regenerated.
4530         * generated/maxloc1_4_i2.c: Regenerated.
4531         * generated/maxloc1_4_i4.c: Regenerated.
4532         * generated/maxloc1_4_i8.c: Regenerated.
4533         * generated/maxloc1_4_r10.c: Regenerated.
4534         * generated/maxloc1_4_r16.c: Regenerated.
4535         * generated/maxloc1_4_r4.c: Regenerated.
4536         * generated/maxloc1_4_r8.c: Regenerated.
4537         * generated/maxloc1_8_i1.c: Regenerated.
4538         * generated/maxloc1_8_i16.c: Regenerated.
4539         * generated/maxloc1_8_i2.c: Regenerated.
4540         * generated/maxloc1_8_i4.c: Regenerated.
4541         * generated/maxloc1_8_i8.c: Regenerated.
4542         * generated/maxloc1_8_r10.c: Regenerated.
4543         * generated/maxloc1_8_r16.c: Regenerated.
4544         * generated/maxloc1_8_r4.c: Regenerated.
4545         * generated/maxloc1_8_r8.c: Regenerated.
4546         * generated/maxval_i1.c: Regenerated.
4547         * generated/maxval_i16.c: Regenerated.
4548         * generated/maxval_i2.c: Regenerated.
4549         * generated/maxval_i4.c: Regenerated.
4550         * generated/maxval_i8.c: Regenerated.
4551         * generated/maxval_r10.c: Regenerated.
4552         * generated/maxval_r16.c: Regenerated.
4553         * generated/maxval_r4.c: Regenerated.
4554         * generated/maxval_r8.c: Regenerated.
4555         * generated/minloc0_16_i1.c: Regenerated.
4556         * generated/minloc0_16_i16.c: Regenerated.
4557         * generated/minloc0_16_i2.c: Regenerated.
4558         * generated/minloc0_16_i4.c: Regenerated.
4559         * generated/minloc0_16_i8.c: Regenerated.
4560         * generated/minloc0_16_r10.c: Regenerated.
4561         * generated/minloc0_16_r16.c: Regenerated.
4562         * generated/minloc0_16_r4.c: Regenerated.
4563         * generated/minloc0_16_r8.c: Regenerated.
4564         * generated/minloc0_4_i1.c: Regenerated.
4565         * generated/minloc0_4_i16.c: Regenerated.
4566         * generated/minloc0_4_i2.c: Regenerated.
4567         * generated/minloc0_4_i4.c: Regenerated.
4568         * generated/minloc0_4_i8.c: Regenerated.
4569         * generated/minloc0_4_r10.c: Regenerated.
4570         * generated/minloc0_4_r16.c: Regenerated.
4571         * generated/minloc0_4_r4.c: Regenerated.
4572         * generated/minloc0_4_r8.c: Regenerated.
4573         * generated/minloc0_8_i1.c: Regenerated.
4574         * generated/minloc0_8_i16.c: Regenerated.
4575         * generated/minloc0_8_i2.c: Regenerated.
4576         * generated/minloc0_8_i4.c: Regenerated.
4577         * generated/minloc0_8_i8.c: Regenerated.
4578         * generated/minloc0_8_r10.c: Regenerated.
4579         * generated/minloc0_8_r16.c: Regenerated.
4580         * generated/minloc0_8_r4.c: Regenerated.
4581         * generated/minloc0_8_r8.c: Regenerated.
4582         * generated/minloc1_16_i1.c: Regenerated.
4583         * generated/minloc1_16_i16.c: Regenerated.
4584         * generated/minloc1_16_i2.c: Regenerated.
4585         * generated/minloc1_16_i4.c: Regenerated.
4586         * generated/minloc1_16_i8.c: Regenerated.
4587         * generated/minloc1_16_r10.c: Regenerated.
4588         * generated/minloc1_16_r16.c: Regenerated.
4589         * generated/minloc1_16_r4.c: Regenerated.
4590         * generated/minloc1_16_r8.c: Regenerated.
4591         * generated/minloc1_4_i1.c: Regenerated.
4592         * generated/minloc1_4_i16.c: Regenerated.
4593         * generated/minloc1_4_i2.c: Regenerated.
4594         * generated/minloc1_4_i4.c: Regenerated.
4595         * generated/minloc1_4_i8.c: Regenerated.
4596         * generated/minloc1_4_r10.c: Regenerated.
4597         * generated/minloc1_4_r16.c: Regenerated.
4598         * generated/minloc1_4_r4.c: Regenerated.
4599         * generated/minloc1_4_r8.c: Regenerated.
4600         * generated/minloc1_8_i1.c: Regenerated.
4601         * generated/minloc1_8_i16.c: Regenerated.
4602         * generated/minloc1_8_i2.c: Regenerated.
4603         * generated/minloc1_8_i4.c: Regenerated.
4604         * generated/minloc1_8_i8.c: Regenerated.
4605         * generated/minloc1_8_r10.c: Regenerated.
4606         * generated/minloc1_8_r16.c: Regenerated.
4607         * generated/minloc1_8_r4.c: Regenerated.
4608         * generated/minloc1_8_r8.c: Regenerated.
4609         * generated/minval_i1.c: Regenerated.
4610         * generated/minval_i16.c: Regenerated.
4611         * generated/minval_i2.c: Regenerated.
4612         * generated/minval_i4.c: Regenerated.
4613         * generated/minval_i8.c: Regenerated.
4614         * generated/minval_r10.c: Regenerated.
4615         * generated/minval_r16.c: Regenerated.
4616         * generated/minval_r4.c: Regenerated.
4617         * generated/minval_r8.c: Regenerated.
4618         * generated/product_c10.c: Regenerated.
4619         * generated/product_c16.c: Regenerated.
4620         * generated/product_c4.c: Regenerated.
4621         * generated/product_c8.c: Regenerated.
4622         * generated/product_i1.c: Regenerated.
4623         * generated/product_i16.c: Regenerated.
4624         * generated/product_i2.c: Regenerated.
4625         * generated/product_i4.c: Regenerated.
4626         * generated/product_i8.c: Regenerated.
4627         * generated/product_r10.c: Regenerated.
4628         * generated/product_r16.c: Regenerated.
4629         * generated/product_r4.c: Regenerated.
4630         * generated/product_r8.c: Regenerated.
4631         * generated/sum_c10.c: Regenerated.
4632         * generated/sum_c16.c: Regenerated.
4633         * generated/sum_c4.c: Regenerated.
4634         * generated/sum_c8.c: Regenerated.
4635         * generated/sum_i1.c: Regenerated.
4636         * generated/sum_i16.c: Regenerated.
4637         * generated/sum_i2.c: Regenerated.
4638         * generated/sum_i4.c: Regenerated.
4639         * generated/sum_i8.c: Regenerated.
4640         * generated/sum_r10.c: Regenerated.
4641         * generated/sum_r16.c: Regenerated.
4642         * generated/sum_r4.c: Regenerated.
4643         * generated/sum_r8.c: Regenerated.
4644
4645 2008-01-11  Thomas Koenig  <tkoenig@gcc.gnu.org>
4646
4647         PR libfortran/34670
4648         * m4/iparm.m4 (upcase):  New macro (copied from the m4 manual).
4649         (u_name):  New macro for the upper case name of the intrinsic.
4650         * m4/iforeach.m4 (name`'rtype_qual`_'atype_code):  Add
4651         bounds checking and rank check, depending on
4652         compile_options.bounds_check.
4653         (`m'name`'rtype_qual`_'atype_code):  Likewise.
4654         (`s'name`'rtype_qual`_'atype_code):  Likewise.
4655         * m4/ifunction.m4 (name`'rtype_qual`_'atype_code):  Add
4656         bounds checking and rank check, depending on
4657         compile_options.bounds_check.
4658         (`m'name`'rtype_qual`_'atype_code):  Likewise.
4659         (`s'name`'rtype_qual`_'atype_code):  Likewise.
4660         * generated/all_l16.c: Regenerated.
4661         * generated/all_l4.c: Regenerated.
4662         * generated/all_l8.c: Regenerated.
4663         * generated/any_l16.c: Regenerated.
4664         * generated/any_l4.c: Regenerated.
4665         * generated/any_l8.c: Regenerated.
4666         * generated/count_16_l16.c: Regenerated.
4667         * generated/count_16_l4.c: Regenerated.
4668         * generated/count_16_l8.c: Regenerated.
4669         * generated/count_4_l16.c: Regenerated.
4670         * generated/count_4_l4.c: Regenerated.
4671         * generated/count_4_l8.c: Regenerated.
4672         * generated/count_8_l16.c: Regenerated.
4673         * generated/count_8_l4.c: Regenerated.
4674         * generated/count_8_l8.c: Regenerated.
4675         * generated/maxloc0_16_i1.c: Regenerated.
4676         * generated/maxloc0_16_i16.c: Regenerated.
4677         * generated/maxloc0_16_i2.c: Regenerated.
4678         * generated/maxloc0_16_i4.c: Regenerated.
4679         * generated/maxloc0_16_i8.c: Regenerated.
4680         * generated/maxloc0_16_r10.c: Regenerated.
4681         * generated/maxloc0_16_r16.c: Regenerated.
4682         * generated/maxloc0_16_r4.c: Regenerated.
4683         * generated/maxloc0_16_r8.c: Regenerated.
4684         * generated/maxloc0_4_i1.c: Regenerated.
4685         * generated/maxloc0_4_i16.c: Regenerated.
4686         * generated/maxloc0_4_i2.c: Regenerated.
4687         * generated/maxloc0_4_i4.c: Regenerated.
4688         * generated/maxloc0_4_i8.c: Regenerated.
4689         * generated/maxloc0_4_r10.c: Regenerated.
4690         * generated/maxloc0_4_r16.c: Regenerated.
4691         * generated/maxloc0_4_r4.c: Regenerated.
4692         * generated/maxloc0_4_r8.c: Regenerated.
4693         * generated/maxloc0_8_i1.c: Regenerated.
4694         * generated/maxloc0_8_i16.c: Regenerated.
4695         * generated/maxloc0_8_i2.c: Regenerated.
4696         * generated/maxloc0_8_i4.c: Regenerated.
4697         * generated/maxloc0_8_i8.c: Regenerated.
4698         * generated/maxloc0_8_r10.c: Regenerated.
4699         * generated/maxloc0_8_r16.c: Regenerated.
4700         * generated/maxloc0_8_r4.c: Regenerated.
4701         * generated/maxloc0_8_r8.c: Regenerated.
4702         * generated/maxloc1_16_i1.c: Regenerated.
4703         * generated/maxloc1_16_i16.c: Regenerated.
4704         * generated/maxloc1_16_i2.c: Regenerated.
4705         * generated/maxloc1_16_i4.c: Regenerated.
4706         * generated/maxloc1_16_i8.c: Regenerated.
4707         * generated/maxloc1_16_r10.c: Regenerated.
4708         * generated/maxloc1_16_r16.c: Regenerated.
4709         * generated/maxloc1_16_r4.c: Regenerated.
4710         * generated/maxloc1_16_r8.c: Regenerated.
4711         * generated/maxloc1_4_i1.c: Regenerated.
4712         * generated/maxloc1_4_i16.c: Regenerated.
4713         * generated/maxloc1_4_i2.c: Regenerated.
4714         * generated/maxloc1_4_i4.c: Regenerated.
4715         * generated/maxloc1_4_i8.c: Regenerated.
4716         * generated/maxloc1_4_r10.c: Regenerated.
4717         * generated/maxloc1_4_r16.c: Regenerated.
4718         * generated/maxloc1_4_r4.c: Regenerated.
4719         * generated/maxloc1_4_r8.c: Regenerated.
4720         * generated/maxloc1_8_i1.c: Regenerated.
4721         * generated/maxloc1_8_i16.c: Regenerated.
4722         * generated/maxloc1_8_i2.c: Regenerated.
4723         * generated/maxloc1_8_i4.c: Regenerated.
4724         * generated/maxloc1_8_i8.c: Regenerated.
4725         * generated/maxloc1_8_r10.c: Regenerated.
4726         * generated/maxloc1_8_r16.c: Regenerated.
4727         * generated/maxloc1_8_r4.c: Regenerated.
4728         * generated/maxloc1_8_r8.c: Regenerated.
4729         * generated/maxval_i1.c: Regenerated.
4730         * generated/maxval_i16.c: Regenerated.
4731         * generated/maxval_i2.c: Regenerated.
4732         * generated/maxval_i4.c: Regenerated.
4733         * generated/maxval_i8.c: Regenerated.
4734         * generated/maxval_r10.c: Regenerated.
4735         * generated/maxval_r16.c: Regenerated.
4736         * generated/maxval_r4.c: Regenerated.
4737         * generated/maxval_r8.c: Regenerated.
4738         * generated/minloc0_16_i1.c: Regenerated.
4739         * generated/minloc0_16_i16.c: Regenerated.
4740         * generated/minloc0_16_i2.c: Regenerated.
4741         * generated/minloc0_16_i4.c: Regenerated.
4742         * generated/minloc0_16_i8.c: Regenerated.
4743         * generated/minloc0_16_r10.c: Regenerated.
4744         * generated/minloc0_16_r16.c: Regenerated.
4745         * generated/minloc0_16_r4.c: Regenerated.
4746         * generated/minloc0_16_r8.c: Regenerated.
4747         * generated/minloc0_4_i1.c: Regenerated.
4748         * generated/minloc0_4_i16.c: Regenerated.
4749         * generated/minloc0_4_i2.c: Regenerated.
4750         * generated/minloc0_4_i4.c: Regenerated.
4751         * generated/minloc0_4_i8.c: Regenerated.
4752         * generated/minloc0_4_r10.c: Regenerated.
4753         * generated/minloc0_4_r16.c: Regenerated.
4754         * generated/minloc0_4_r4.c: Regenerated.
4755         * generated/minloc0_4_r8.c: Regenerated.
4756         * generated/minloc0_8_i1.c: Regenerated.
4757         * generated/minloc0_8_i16.c: Regenerated.
4758         * generated/minloc0_8_i2.c: Regenerated.
4759         * generated/minloc0_8_i4.c: Regenerated.
4760         * generated/minloc0_8_i8.c: Regenerated.
4761         * generated/minloc0_8_r10.c: Regenerated.
4762         * generated/minloc0_8_r16.c: Regenerated.
4763         * generated/minloc0_8_r4.c: Regenerated.
4764         * generated/minloc0_8_r8.c: Regenerated.
4765         * generated/minloc1_16_i1.c: Regenerated.
4766         * generated/minloc1_16_i16.c: Regenerated.
4767         * generated/minloc1_16_i2.c: Regenerated.
4768         * generated/minloc1_16_i4.c: Regenerated.
4769         * generated/minloc1_16_i8.c: Regenerated.
4770         * generated/minloc1_16_r10.c: Regenerated.
4771         * generated/minloc1_16_r16.c: Regenerated.
4772         * generated/minloc1_16_r4.c: Regenerated.
4773         * generated/minloc1_16_r8.c: Regenerated.
4774         * generated/minloc1_4_i1.c: Regenerated.
4775         * generated/minloc1_4_i16.c: Regenerated.
4776         * generated/minloc1_4_i2.c: Regenerated.
4777         * generated/minloc1_4_i4.c: Regenerated.
4778         * generated/minloc1_4_i8.c: Regenerated.
4779         * generated/minloc1_4_r10.c: Regenerated.
4780         * generated/minloc1_4_r16.c: Regenerated.
4781         * generated/minloc1_4_r4.c: Regenerated.
4782         * generated/minloc1_4_r8.c: Regenerated.
4783         * generated/minloc1_8_i1.c: Regenerated.
4784         * generated/minloc1_8_i16.c: Regenerated.
4785         * generated/minloc1_8_i2.c: Regenerated.
4786         * generated/minloc1_8_i4.c: Regenerated.
4787         * generated/minloc1_8_i8.c: Regenerated.
4788         * generated/minloc1_8_r10.c: Regenerated.
4789         * generated/minloc1_8_r16.c: Regenerated.
4790         * generated/minloc1_8_r4.c: Regenerated.
4791         * generated/minloc1_8_r8.c: Regenerated.
4792         * generated/minval_i1.c: Regenerated.
4793         * generated/minval_i16.c: Regenerated.
4794         * generated/minval_i2.c: Regenerated.
4795         * generated/minval_i4.c: Regenerated.
4796         * generated/minval_i8.c: Regenerated.
4797         * generated/minval_r10.c: Regenerated.
4798         * generated/minval_r16.c: Regenerated.
4799         * generated/minval_r4.c: Regenerated.
4800         * generated/minval_r8.c: Regenerated.
4801         * generated/product_c10.c: Regenerated.
4802         * generated/product_c16.c: Regenerated.
4803         * generated/product_c4.c: Regenerated.
4804         * generated/product_c8.c: Regenerated.
4805         * generated/product_i1.c: Regenerated.
4806         * generated/product_i16.c: Regenerated.
4807         * generated/product_i2.c: Regenerated.
4808         * generated/product_i4.c: Regenerated.
4809         * generated/product_i8.c: Regenerated.
4810         * generated/product_r10.c: Regenerated.
4811         * generated/product_r16.c: Regenerated.
4812         * generated/product_r4.c: Regenerated.
4813         * generated/product_r8.c: Regenerated.
4814         * generated/sum_c10.c: Regenerated.
4815         * generated/sum_c16.c: Regenerated.
4816         * generated/sum_c4.c: Regenerated.
4817         * generated/sum_c8.c: Regenerated.
4818         * generated/sum_i1.c: Regenerated.
4819         * generated/sum_i16.c: Regenerated.
4820         * generated/sum_i2.c: Regenerated.
4821         * generated/sum_i4.c: Regenerated.
4822         * generated/sum_i8.c: Regenerated.
4823         * generated/sum_r10.c: Regenerated.
4824         * generated/sum_r16.c: Regenerated.
4825         * generated/sum_r4.c: Regenerated.
4826         * generated/sum_r8.c: Regenerated.
4827
4828 2008-01-05  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
4829
4830         PR libfortran/34676
4831         * io/list_read.c (next_char): Only save the EOF condition for later if
4832         advance="no".
4833
4834 2008-01-03  Thomas Koenig  <tkoenig@gcc.gnu.org>
4835
4836         PR libfortran/34565
4837         * io/io.h:  Adjust protoypes for open_internal(),
4838         next_array_record() and init_loop_spec().
4839         * io/list_read.c (next_char):  Use argument "finished"
4840         of next_array_record to check for end on internal file.
4841         * io/unit.c:  Calculate the offset for an array
4842         internal file and supply this informatin to open_internal().
4843         * io/unix.c (open_internal):  Set the offset for the internal
4844         file on open.
4845         * io/transfer.c (init_loop_spec):  Calculate the starting
4846         record in case of negative strides.  Return size of 0 for
4847         an empty array.
4848         (next_array_record):  Use an extra flag to signal that the
4849         array is finished.
4850         (next_record_r):  Use the new flag to next_array_record().
4851         (next_record_w):  Likewise.