libgfortran/ChangeLog

   1 2008-03-17  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
   2
   3         PR libfortran/35617
   4         * io/list_read.c (eat_separator): If next character after eatline is '!'
   5         then eatline again.
   6
   7 2008-03-16  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
   8
   9         * aclocal.m4: Regenerate.
  10         * configure: Likewise.
  11         * Makefile.in: Likewise.
  12
  13 2008-03-12  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  14
  15         PR libfortran/35524
  16         * intrinsics/erfc_scaled_inc.c: Only define the long double
  17         variant of erfc_scaled if expl is available.
  18
  19 2008-03-11  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  20
  21         PR libfortran/32812
  22         * intrinsics/random.c (scramble_seed, unscramble_seed): New
  23         functions.
  24         (random_seed_i4): Scramble the seed the user gives us before
  25         storing it, and unscramble it when we return it back later.
  26
  27 2008-03-05  Hans-Peter Nilsson  <hp@axis.com>
  28
  29         PR libfortran/35293
  30         * io/unix.c (fd_truncate): Fold s->special_file case into
  31         success case of ftruncate/chsize call instead of the failure case.
  32         Make failure case actually return failure.  Properly update stream
  33         pointers on failure.  Call runtime_error for targets without
  34         neither ftruncate nor chsize where such a call would be needed.
  35
  36 2008-03-03  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  37
  38         PR fortran/33197
  39         * intrinsics/erfc_scaled_inc.c: New file.
  40         * intrinsics/erfc_scaled.c: New file.
  41         * gfortran.map (GFORTRAN_1.0): Add _gfortran_erfc_scaled_r*.
  42         * Makefile.am: Add intrinsics/erfc_scaled.c.
  43         * config.h.in: Regenerate.
  44         * configure: Regenerate.
  45         * Makefile.in: Regenerate.
  46
  47 2008-03-01  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  48
  49         PR libfortran/35355
  50         * intrinsics/time_1.h (__time_1): Fix calculation of user_usec
  51         for mingw.
  52
  53 2008-03-01  Janne Blomqvist  <jb@gcc.gnu.org>
  54
  55         PR libfortran/35063
  56         * io/unit.c (destroy_unit_mutex): Call __gthread_mutex_destroy
  57         instead of macro kludge.
  58
  59 2008-02-25  Janne Blomqvist  <jb@gcc.gnu.org>
  60
  61         PR fortran/29549
  62         * Makefile.am: Add -fcx-fortran-rules to AM_CFLAGS for all of
  63         libgfortran.
  64         * Makefile.in: Regenerated.
  65
  66 2008-02-25  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  67
  68         * m4/ifunction_logical.m4: Add casts to get rid of warnings.
  69         * generated/all_l1.c: Regenerate.
  70         * generated/all_l2.c: Regenerate.
  71         * generated/all_l4.c: Regenerate.
  72         * generated/all_l8.c: Regenerate.
  73         * generated/all_l16.c: Regenerate.
  74         * generated/any_l1.c: Regenerate.
  75         * generated/any_l2.c: Regenerate.
  76         * generated/any_l4.c: Regenerate.
  77         * generated/any_l8.c: Regenerate.
  78         * generated/any_l16.c: Regenerate.
  79         * generated/count_1_l.c: Regenerate.
  80         * generated/count_2_l.c: Regenerate.
  81         * generated/count_4_l.c: Regenerate.
  82         * generated/count_8_l.c: Regenerate.
  83         * generated/count_16_l.c: Regenerate.
  84
  85 2008-02-24  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  86
  87         PR libfortran/32841
  88         * acinclude.m4: Don't use HAVE_MATH_H.
  89         * configure: Regenerate.
  90
  91 2008-02-20  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
  92
  93         PR libfortran/35132
  94         * io/transfer.c (next_record_w): Truncate after the last record for
  95         STREAM I/O.
  96
  97         PR libfortran/34954
  98         * io/transfer.c (data_transfer_init): Initialize dtp->rec if writing.
  99
 100         PR libfortran/34974
 101         * io/transfer.c (formatted_transfer_scalar): Flush the buffer if skips
 102         is less than zero. (next_record_w): Use sseek to position the file to
 103         the max position reached.
 104
 105 2008-02-20  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 106
 107         PR libfortran/35036
 108         * write_float.def (output_float):  Add error checks for zero digits
 109         after decimal point in E and D format specifiers.
 110
 111 2008-02-10  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 112
 113         PR libfortran/35063
 114         * io/unit.c (destroy_unit_mutex): New function that uses
 115         __gthread_mutex_destroy_function or pthread_mutex_destroy after
 116         unlocking and before free_mem for final closure of I/O unit.
 117         (delete_root): Use new function.
 118         (free_internal_unit): Likewise.
 119         (close_unit_1): Likewise.
 120
 121 2008-02-02  Thomas Koenig  <tkoenig@gcc.gnu.org>
 122
 123         PR libfortran/35001
 124         * m4/shape.m4:  Return 0 for extents <= 0.
 125         * generated/shape_i4.c:  Regenerated.
 126         * generated/shape_i8.c:  Regenerated.
 127         * generated/shape_i16.c:  Regenerated.
 128
 129 2008-01-27  Thomas Koenig  <tkoenig@gcc.gnu.org>
 130
 131         PR libfortran/34980
 132         * m4/shape.m4:  If return array is empty, return early.
 133         * generated/shape_i4.c:  Regenerated.
 134         * generated/shape_i8.c:  Regenerated.
 135         * generated/shape_i16.c:  Regenerated.
 136
 137 2008-01-26  Thomas Koenig  <tkoenig@gcc.gnu.org>
 138
 139         PR libfofortran/34887
 140         * io/transfer.c (next_record_w): Always move to the farthest
 141         position when completing the record (also when we are
 142         processing a slash edit descriptor).
 143
 144 2008-01-25  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 145
 146         PR libfortran/34876
 147         * io/transfer.c (write_buf): Handle case of zero sized array.
 148         (transfer_array): Set data pointer to NULL and size to zero.  Then
 149         make a data transfer and return.
 150
 151 2008-01-24  David Edelsohn  <edelsohn@gnu.org>
 152
 153         * configure: Regenerate.
 154
 155 2008-01-19  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 156
 157         PR libfortran/34795
 158         * io/inquire.c (inquire_via_unit): If a unit is opened, return values
 159         according to the open action for DIRECT, FORMATTED, and UNFORMATTED.
 160         (inquire_via_filename): Return "UNKNOWN" for SEQUENTIAL, DIRECT,
 161         FORAMATTED, and UNFORMATTED inquiries.
 162         * io/unix.c (inquire_sequential): Return "UNKNOWN" when appropriate
 163         for files that are not opened. (inquire_direct): Same.
 164         (inquire_formatted): Same.
 165
 166 2008-01-18  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 167
 168         PR libfortran/34782
 169         * io/transfer.c (formatted_transfer_scalar): Set max_pos to the greater
 170         of the current max_pos or the newly calculated position.
 171
 172 2008-01-18  Tobias Burnus  <burnus@net-b.de>
 173
 174         * io/write.c (write_real): Increase default precision
 175         for REAL(16) by one.
 176
 177 2008-01-16  Steven Bosscher  <steven@gcc.gnu.org>
 178
 179         PR libfortran/34669
 180         * mk-kinds-h.sh: Compile with -S to avoid calling the assembler,
 181         to avoid piping the -fdump-parse-tree output to the assembler
 182         when configuring with -pipe.
 183         * mk-sik-inc.sh: Likewise.
 184         * mk-srk-inc.sh: Likewise.
 185
 186 2008-01-15  Thomas Koenig  <tkoenig@gcc.gnu.org>
 187
 188         PR libfortran/34671
 189         * gfortran.am: Added _gfortran_all_l1, _gfortran_all_l2,
 190         _gfortran_any_l1, _gfortran_any_l2, -28,15 _gfortran_count_1_l,
 191         _gfortran_count_16_l, _gfortran_count_2_l, _gfortran_count_4_l and
 192         _gfortran_count_8_l Removed _gfortran_count_16_l16,
 193         _gfortran_count_16_l4, _gfortran_count_16_l8,
 194         _gfortran_count_4_l16, _gfortran_count_4_l4, _gfortran_count_4_l8,
 195         _gfortran_count_8_l16, _gfortran_count_8_l4 and
 196         _gfortran_count_8_l8.
 197         * Makefile.am: Added generated/any_l1.c and generated/any_l2.c to
 198         i_any_c.  Added generated/all_l1. and generated/all_l2.c to
 199         i_all_c.  Removed generated/count_4_l4.c, generated/count_8_l4.c,
 200         generated/count_16_l4.c, generated/count_4_l8.c,
 201         generated/count_8_l8.c, generated/count_16_l8.c,
 202         generated/count_4_l16.c, generated/count_8_l16.c, and
 203         generated/count_16_l16.c from i_count_c.  Added count_1_l.c,
 204         count_2_l.c, count_4_l.c, count_8_l.c and count_16_l.c to
 205         i_count_c.  I_M4_DEPS2 depends on ifunction_logical.m4, for
 206         any of the files generated from all.m4, any.m4 and count.m4.
 207         * Makefile.in:  Regenerated.
 208         * m4/ifunction_logical.m4:  New file.  Use
 209         GFC_LOGICAL_1 pointer for access to source arrays.
 210         * m4/any.m4:  Include ifunction_logical.m4 instead of
 211         ifunction.m4.  Don't check atype_name.
 212         * m4/all.m4:  Likewise.
 213         * m4/count.m4:  Likewise.
 214         * generated/any_l1.c:  New file.
 215         * generated/any_l2.c:  New file.
 216         * generated/all_l1.c:  New file.
 217         * generated/count_1_l.c:  New file.
 218         * generated/count_2_l.c:  New file.
 219         * generated/count_4_l.c:  New file.
 220         * generated/count_8_l.c:  New file.
 221         * generated/count_16_l.c:  New file.
 222         * generated/any_l4.c:  Regenerated.
 223         * generated/any_l8.c:  Regenerated.
 224         * generated/any_l16.c:  Regenerated.
 225         * generated/all_l4.c: Regenerated.
 226         * generated/all_l8.c: Regenerated.
 227         * generated/all_l16.c: Regenerated.
 228         * generated/count_4_l4.c:  Removed.
 229         * generated/count_4_l8.c:  Removed.
 230         * generated/count_4_l16.c:  Removed.
 231         * generated/count_8_l4.c:  Removed.
 232         * generated/count_8_l8.c:  Removed.
 233         * generated/count_8_l16.c:  Removed.
 234         * generated/count_16_l4.c:  Removed.
 235         * generated/count_16_l8.c:  Removed.
 236         * generated/count_16_l16.c:  Removed.
 237
 238 2008-01-13  Thomas Koenig  <tkoenig@gcc.gnu.org>
 239
 240         PR libfortran/34746
 241         * m4/iforeach.m4 (name`'rtype_qual`_'atype_code):  Use %ld
 242         in printf format for all bounds checking; cast all
 243         integer-like arguments to runtime_error() to long int.
 244         (`m'name`'rtype_qual`_'atype_code):  Likewise.
 245         (`s'name`'rtype_qual`_'atype_code):  Likewise.
 246         * m4/ifunction.m4 (name`'rtype_qual`_'atype_code):  Likewise.
 247         (`m'name`'rtype_qual`_'atype_code):  Likewise.
 248         (`s'name`'rtype_qual`_'atype_code):  Likewise.
 249         * generated/all_l16.c: Regenerated.
 250         * generated/all_l4.c: Regenerated.
 251         * generated/all_l8.c: Regenerated.
 252         * generated/any_l16.c: Regenerated.
 253         * generated/any_l4.c: Regenerated.
 254         * generated/any_l8.c: Regenerated.
 255         * generated/count_16_l16.c: Regenerated.
 256         * generated/count_16_l4.c: Regenerated.
 257         * generated/count_16_l8.c: Regenerated.
 258         * generated/count_4_l16.c: Regenerated.
 259         * generated/count_4_l4.c: Regenerated.
 260         * generated/count_4_l8.c: Regenerated.
 261         * generated/count_8_l16.c: Regenerated.
 262         * generated/count_8_l4.c: Regenerated.
 263         * generated/count_8_l8.c: Regenerated.
 264         * generated/maxloc0_16_i1.c: Regenerated.
 265         * generated/maxloc0_16_i16.c: Regenerated.
 266         * generated/maxloc0_16_i2.c: Regenerated.
 267         * generated/maxloc0_16_i4.c: Regenerated.
 268         * generated/maxloc0_16_i8.c: Regenerated.
 269         * generated/maxloc0_16_r10.c: Regenerated.
 270         * generated/maxloc0_16_r16.c: Regenerated.
 271         * generated/maxloc0_16_r4.c: Regenerated.
 272         * generated/maxloc0_16_r8.c: Regenerated.
 273         * generated/maxloc0_4_i1.c: Regenerated.
 274         * generated/maxloc0_4_i16.c: Regenerated.
 275         * generated/maxloc0_4_i2.c: Regenerated.
 276         * generated/maxloc0_4_i4.c: Regenerated.
 277         * generated/maxloc0_4_i8.c: Regenerated.
 278         * generated/maxloc0_4_r10.c: Regenerated.
 279         * generated/maxloc0_4_r16.c: Regenerated.
 280         * generated/maxloc0_4_r4.c: Regenerated.
 281         * generated/maxloc0_4_r8.c: Regenerated.
 282         * generated/maxloc0_8_i1.c: Regenerated.
 283         * generated/maxloc0_8_i16.c: Regenerated.
 284         * generated/maxloc0_8_i2.c: Regenerated.
 285         * generated/maxloc0_8_i4.c: Regenerated.
 286         * generated/maxloc0_8_i8.c: Regenerated.
 287         * generated/maxloc0_8_r10.c: Regenerated.
 288         * generated/maxloc0_8_r16.c: Regenerated.
 289         * generated/maxloc0_8_r4.c: Regenerated.
 290         * generated/maxloc0_8_r8.c: Regenerated.
 291         * generated/maxloc1_16_i1.c: Regenerated.
 292         * generated/maxloc1_16_i16.c: Regenerated.
 293         * generated/maxloc1_16_i2.c: Regenerated.
 294         * generated/maxloc1_16_i4.c: Regenerated.
 295         * generated/maxloc1_16_i8.c: Regenerated.
 296         * generated/maxloc1_16_r10.c: Regenerated.
 297         * generated/maxloc1_16_r16.c: Regenerated.
 298         * generated/maxloc1_16_r4.c: Regenerated.
 299         * generated/maxloc1_16_r8.c: Regenerated.
 300         * generated/maxloc1_4_i1.c: Regenerated.
 301         * generated/maxloc1_4_i16.c: Regenerated.
 302         * generated/maxloc1_4_i2.c: Regenerated.
 303         * generated/maxloc1_4_i4.c: Regenerated.
 304         * generated/maxloc1_4_i8.c: Regenerated.
 305         * generated/maxloc1_4_r10.c: Regenerated.
 306         * generated/maxloc1_4_r16.c: Regenerated.
 307         * generated/maxloc1_4_r4.c: Regenerated.
 308         * generated/maxloc1_4_r8.c: Regenerated.
 309         * generated/maxloc1_8_i1.c: Regenerated.
 310         * generated/maxloc1_8_i16.c: Regenerated.
 311         * generated/maxloc1_8_i2.c: Regenerated.
 312         * generated/maxloc1_8_i4.c: Regenerated.
 313         * generated/maxloc1_8_i8.c: Regenerated.
 314         * generated/maxloc1_8_r10.c: Regenerated.
 315         * generated/maxloc1_8_r16.c: Regenerated.
 316         * generated/maxloc1_8_r4.c: Regenerated.
 317         * generated/maxloc1_8_r8.c: Regenerated.
 318         * generated/maxval_i1.c: Regenerated.
 319         * generated/maxval_i16.c: Regenerated.
 320         * generated/maxval_i2.c: Regenerated.
 321         * generated/maxval_i4.c: Regenerated.
 322         * generated/maxval_i8.c: Regenerated.
 323         * generated/maxval_r10.c: Regenerated.
 324         * generated/maxval_r16.c: Regenerated.
 325         * generated/maxval_r4.c: Regenerated.
 326         * generated/maxval_r8.c: Regenerated.
 327         * generated/minloc0_16_i1.c: Regenerated.
 328         * generated/minloc0_16_i16.c: Regenerated.
 329         * generated/minloc0_16_i2.c: Regenerated.
 330         * generated/minloc0_16_i4.c: Regenerated.
 331         * generated/minloc0_16_i8.c: Regenerated.
 332         * generated/minloc0_16_r10.c: Regenerated.
 333         * generated/minloc0_16_r16.c: Regenerated.
 334         * generated/minloc0_16_r4.c: Regenerated.
 335         * generated/minloc0_16_r8.c: Regenerated.
 336         * generated/minloc0_4_i1.c: Regenerated.
 337         * generated/minloc0_4_i16.c: Regenerated.
 338         * generated/minloc0_4_i2.c: Regenerated.
 339         * generated/minloc0_4_i4.c: Regenerated.
 340         * generated/minloc0_4_i8.c: Regenerated.
 341         * generated/minloc0_4_r10.c: Regenerated.
 342         * generated/minloc0_4_r16.c: Regenerated.
 343         * generated/minloc0_4_r4.c: Regenerated.
 344         * generated/minloc0_4_r8.c: Regenerated.
 345         * generated/minloc0_8_i1.c: Regenerated.
 346         * generated/minloc0_8_i16.c: Regenerated.
 347         * generated/minloc0_8_i2.c: Regenerated.
 348         * generated/minloc0_8_i4.c: Regenerated.
 349         * generated/minloc0_8_i8.c: Regenerated.
 350         * generated/minloc0_8_r10.c: Regenerated.
 351         * generated/minloc0_8_r16.c: Regenerated.
 352         * generated/minloc0_8_r4.c: Regenerated.
 353         * generated/minloc0_8_r8.c: Regenerated.
 354         * generated/minloc1_16_i1.c: Regenerated.
 355         * generated/minloc1_16_i16.c: Regenerated.
 356         * generated/minloc1_16_i2.c: Regenerated.
 357         * generated/minloc1_16_i4.c: Regenerated.
 358         * generated/minloc1_16_i8.c: Regenerated.
 359         * generated/minloc1_16_r10.c: Regenerated.
 360         * generated/minloc1_16_r16.c: Regenerated.
 361         * generated/minloc1_16_r4.c: Regenerated.
 362         * generated/minloc1_16_r8.c: Regenerated.
 363         * generated/minloc1_4_i1.c: Regenerated.
 364         * generated/minloc1_4_i16.c: Regenerated.
 365         * generated/minloc1_4_i2.c: Regenerated.
 366         * generated/minloc1_4_i4.c: Regenerated.
 367         * generated/minloc1_4_i8.c: Regenerated.
 368         * generated/minloc1_4_r10.c: Regenerated.
 369         * generated/minloc1_4_r16.c: Regenerated.
 370         * generated/minloc1_4_r4.c: Regenerated.
 371         * generated/minloc1_4_r8.c: Regenerated.
 372         * generated/minloc1_8_i1.c: Regenerated.
 373         * generated/minloc1_8_i16.c: Regenerated.
 374         * generated/minloc1_8_i2.c: Regenerated.
 375         * generated/minloc1_8_i4.c: Regenerated.
 376         * generated/minloc1_8_i8.c: Regenerated.
 377         * generated/minloc1_8_r10.c: Regenerated.
 378         * generated/minloc1_8_r16.c: Regenerated.
 379         * generated/minloc1_8_r4.c: Regenerated.
 380         * generated/minloc1_8_r8.c: Regenerated.
 381         * generated/minval_i1.c: Regenerated.
 382         * generated/minval_i16.c: Regenerated.
 383         * generated/minval_i2.c: Regenerated.
 384         * generated/minval_i4.c: Regenerated.
 385         * generated/minval_i8.c: Regenerated.
 386         * generated/minval_r10.c: Regenerated.
 387         * generated/minval_r16.c: Regenerated.
 388         * generated/minval_r4.c: Regenerated.
 389         * generated/minval_r8.c: Regenerated.
 390         * generated/product_c10.c: Regenerated.
 391         * generated/product_c16.c: Regenerated.
 392         * generated/product_c4.c: Regenerated.
 393         * generated/product_c8.c: Regenerated.
 394         * generated/product_i1.c: Regenerated.
 395         * generated/product_i16.c: Regenerated.
 396         * generated/product_i2.c: Regenerated.
 397         * generated/product_i4.c: Regenerated.
 398         * generated/product_i8.c: Regenerated.
 399         * generated/product_r10.c: Regenerated.
 400         * generated/product_r16.c: Regenerated.
 401         * generated/product_r4.c: Regenerated.
 402         * generated/product_r8.c: Regenerated.
 403         * generated/sum_c10.c: Regenerated.
 404         * generated/sum_c16.c: Regenerated.
 405         * generated/sum_c4.c: Regenerated.
 406         * generated/sum_c8.c: Regenerated.
 407         * generated/sum_i1.c: Regenerated.
 408         * generated/sum_i16.c: Regenerated.
 409         * generated/sum_i2.c: Regenerated.
 410         * generated/sum_i4.c: Regenerated.
 411         * generated/sum_i8.c: Regenerated.
 412         * generated/sum_r10.c: Regenerated.
 413         * generated/sum_r16.c: Regenerated.
 414         * generated/sum_r4.c: Regenerated.
 415         * generated/sum_r8.c: Regenerated.
 416
 417 2008-01-11  Thomas Koenig  <tkoenig@gcc.gnu.org>
 418
 419         PR libfortran/34670
 420         * m4/iparm.m4 (upcase):  New macro (copied from the m4 manual).
 421         (u_name):  New macro for the upper case name of the intrinsic.
 422         * m4/iforeach.m4 (name`'rtype_qual`_'atype_code):  Add
 423         bounds checking and rank check, depending on
 424         compile_options.bounds_check.
 425         (`m'name`'rtype_qual`_'atype_code):  Likewise.
 426         (`s'name`'rtype_qual`_'atype_code):  Likewise.
 427         * m4/ifunction.m4 (name`'rtype_qual`_'atype_code):  Add
 428         bounds checking and rank check, depending on
 429         compile_options.bounds_check.
 430         (`m'name`'rtype_qual`_'atype_code):  Likewise.
 431         (`s'name`'rtype_qual`_'atype_code):  Likewise.
 432         * generated/all_l16.c: Regenerated.
 433         * generated/all_l4.c: Regenerated.
 434         * generated/all_l8.c: Regenerated.
 435         * generated/any_l16.c: Regenerated.
 436         * generated/any_l4.c: Regenerated.
 437         * generated/any_l8.c: Regenerated.
 438         * generated/count_16_l16.c: Regenerated.
 439         * generated/count_16_l4.c: Regenerated.
 440         * generated/count_16_l8.c: Regenerated.
 441         * generated/count_4_l16.c: Regenerated.
 442         * generated/count_4_l4.c: Regenerated.
 443         * generated/count_4_l8.c: Regenerated.
 444         * generated/count_8_l16.c: Regenerated.
 445         * generated/count_8_l4.c: Regenerated.
 446         * generated/count_8_l8.c: Regenerated.
 447         * generated/maxloc0_16_i1.c: Regenerated.
 448         * generated/maxloc0_16_i16.c: Regenerated.
 449         * generated/maxloc0_16_i2.c: Regenerated.
 450         * generated/maxloc0_16_i4.c: Regenerated.
 451         * generated/maxloc0_16_i8.c: Regenerated.
 452         * generated/maxloc0_16_r10.c: Regenerated.
 453         * generated/maxloc0_16_r16.c: Regenerated.
 454         * generated/maxloc0_16_r4.c: Regenerated.
 455         * generated/maxloc0_16_r8.c: Regenerated.
 456         * generated/maxloc0_4_i1.c: Regenerated.
 457         * generated/maxloc0_4_i16.c: Regenerated.
 458         * generated/maxloc0_4_i2.c: Regenerated.
 459         * generated/maxloc0_4_i4.c: Regenerated.
 460         * generated/maxloc0_4_i8.c: Regenerated.
 461         * generated/maxloc0_4_r10.c: Regenerated.
 462         * generated/maxloc0_4_r16.c: Regenerated.
 463         * generated/maxloc0_4_r4.c: Regenerated.
 464         * generated/maxloc0_4_r8.c: Regenerated.
 465         * generated/maxloc0_8_i1.c: Regenerated.
 466         * generated/maxloc0_8_i16.c: Regenerated.
 467         * generated/maxloc0_8_i2.c: Regenerated.
 468         * generated/maxloc0_8_i4.c: Regenerated.
 469         * generated/maxloc0_8_i8.c: Regenerated.
 470         * generated/maxloc0_8_r10.c: Regenerated.
 471         * generated/maxloc0_8_r16.c: Regenerated.
 472         * generated/maxloc0_8_r4.c: Regenerated.
 473         * generated/maxloc0_8_r8.c: Regenerated.
 474         * generated/maxloc1_16_i1.c: Regenerated.
 475         * generated/maxloc1_16_i16.c: Regenerated.
 476         * generated/maxloc1_16_i2.c: Regenerated.
 477         * generated/maxloc1_16_i4.c: Regenerated.
 478         * generated/maxloc1_16_i8.c: Regenerated.
 479         * generated/maxloc1_16_r10.c: Regenerated.
 480         * generated/maxloc1_16_r16.c: Regenerated.
 481         * generated/maxloc1_16_r4.c: Regenerated.
 482         * generated/maxloc1_16_r8.c: Regenerated.
 483         * generated/maxloc1_4_i1.c: Regenerated.
 484         * generated/maxloc1_4_i16.c: Regenerated.
 485         * generated/maxloc1_4_i2.c: Regenerated.
 486         * generated/maxloc1_4_i4.c: Regenerated.
 487         * generated/maxloc1_4_i8.c: Regenerated.
 488         * generated/maxloc1_4_r10.c: Regenerated.
 489         * generated/maxloc1_4_r16.c: Regenerated.
 490         * generated/maxloc1_4_r4.c: Regenerated.
 491         * generated/maxloc1_4_r8.c: Regenerated.
 492         * generated/maxloc1_8_i1.c: Regenerated.
 493         * generated/maxloc1_8_i16.c: Regenerated.
 494         * generated/maxloc1_8_i2.c: Regenerated.
 495         * generated/maxloc1_8_i4.c: Regenerated.
 496         * generated/maxloc1_8_i8.c: Regenerated.
 497         * generated/maxloc1_8_r10.c: Regenerated.
 498         * generated/maxloc1_8_r16.c: Regenerated.
 499         * generated/maxloc1_8_r4.c: Regenerated.
 500         * generated/maxloc1_8_r8.c: Regenerated.
 501         * generated/maxval_i1.c: Regenerated.
 502         * generated/maxval_i16.c: Regenerated.
 503         * generated/maxval_i2.c: Regenerated.
 504         * generated/maxval_i4.c: Regenerated.
 505         * generated/maxval_i8.c: Regenerated.
 506         * generated/maxval_r10.c: Regenerated.
 507         * generated/maxval_r16.c: Regenerated.
 508         * generated/maxval_r4.c: Regenerated.
 509         * generated/maxval_r8.c: Regenerated.
 510         * generated/minloc0_16_i1.c: Regenerated.
 511         * generated/minloc0_16_i16.c: Regenerated.
 512         * generated/minloc0_16_i2.c: Regenerated.
 513         * generated/minloc0_16_i4.c: Regenerated.
 514         * generated/minloc0_16_i8.c: Regenerated.
 515         * generated/minloc0_16_r10.c: Regenerated.
 516         * generated/minloc0_16_r16.c: Regenerated.
 517         * generated/minloc0_16_r4.c: Regenerated.
 518         * generated/minloc0_16_r8.c: Regenerated.
 519         * generated/minloc0_4_i1.c: Regenerated.
 520         * generated/minloc0_4_i16.c: Regenerated.
 521         * generated/minloc0_4_i2.c: Regenerated.
 522         * generated/minloc0_4_i4.c: Regenerated.
 523         * generated/minloc0_4_i8.c: Regenerated.
 524         * generated/minloc0_4_r10.c: Regenerated.
 525         * generated/minloc0_4_r16.c: Regenerated.
 526         * generated/minloc0_4_r4.c: Regenerated.
 527         * generated/minloc0_4_r8.c: Regenerated.
 528         * generated/minloc0_8_i1.c: Regenerated.
 529         * generated/minloc0_8_i16.c: Regenerated.
 530         * generated/minloc0_8_i2.c: Regenerated.
 531         * generated/minloc0_8_i4.c: Regenerated.
 532         * generated/minloc0_8_i8.c: Regenerated.
 533         * generated/minloc0_8_r10.c: Regenerated.
 534         * generated/minloc0_8_r16.c: Regenerated.
 535         * generated/minloc0_8_r4.c: Regenerated.
 536         * generated/minloc0_8_r8.c: Regenerated.
 537         * generated/minloc1_16_i1.c: Regenerated.
 538         * generated/minloc1_16_i16.c: Regenerated.
 539         * generated/minloc1_16_i2.c: Regenerated.
 540         * generated/minloc1_16_i4.c: Regenerated.
 541         * generated/minloc1_16_i8.c: Regenerated.
 542         * generated/minloc1_16_r10.c: Regenerated.
 543         * generated/minloc1_16_r16.c: Regenerated.
 544         * generated/minloc1_16_r4.c: Regenerated.
 545         * generated/minloc1_16_r8.c: Regenerated.
 546         * generated/minloc1_4_i1.c: Regenerated.
 547         * generated/minloc1_4_i16.c: Regenerated.
 548         * generated/minloc1_4_i2.c: Regenerated.
 549         * generated/minloc1_4_i4.c: Regenerated.
 550         * generated/minloc1_4_i8.c: Regenerated.
 551         * generated/minloc1_4_r10.c: Regenerated.
 552         * generated/minloc1_4_r16.c: Regenerated.
 553         * generated/minloc1_4_r4.c: Regenerated.
 554         * generated/minloc1_4_r8.c: Regenerated.
 555         * generated/minloc1_8_i1.c: Regenerated.
 556         * generated/minloc1_8_i16.c: Regenerated.
 557         * generated/minloc1_8_i2.c: Regenerated.
 558         * generated/minloc1_8_i4.c: Regenerated.
 559         * generated/minloc1_8_i8.c: Regenerated.
 560         * generated/minloc1_8_r10.c: Regenerated.
 561         * generated/minloc1_8_r16.c: Regenerated.
 562         * generated/minloc1_8_r4.c: Regenerated.
 563         * generated/minloc1_8_r8.c: Regenerated.
 564         * generated/minval_i1.c: Regenerated.
 565         * generated/minval_i16.c: Regenerated.
 566         * generated/minval_i2.c: Regenerated.
 567         * generated/minval_i4.c: Regenerated.
 568         * generated/minval_i8.c: Regenerated.
 569         * generated/minval_r10.c: Regenerated.
 570         * generated/minval_r16.c: Regenerated.
 571         * generated/minval_r4.c: Regenerated.
 572         * generated/minval_r8.c: Regenerated.
 573         * generated/product_c10.c: Regenerated.
 574         * generated/product_c16.c: Regenerated.
 575         * generated/product_c4.c: Regenerated.
 576         * generated/product_c8.c: Regenerated.
 577         * generated/product_i1.c: Regenerated.
 578         * generated/product_i16.c: Regenerated.
 579         * generated/product_i2.c: Regenerated.
 580         * generated/product_i4.c: Regenerated.
 581         * generated/product_i8.c: Regenerated.
 582         * generated/product_r10.c: Regenerated.
 583         * generated/product_r16.c: Regenerated.
 584         * generated/product_r4.c: Regenerated.
 585         * generated/product_r8.c: Regenerated.
 586         * generated/sum_c10.c: Regenerated.
 587         * generated/sum_c16.c: Regenerated.
 588         * generated/sum_c4.c: Regenerated.
 589         * generated/sum_c8.c: Regenerated.
 590         * generated/sum_i1.c: Regenerated.
 591         * generated/sum_i16.c: Regenerated.
 592         * generated/sum_i2.c: Regenerated.
 593         * generated/sum_i4.c: Regenerated.
 594         * generated/sum_i8.c: Regenerated.
 595         * generated/sum_r10.c: Regenerated.
 596         * generated/sum_r16.c: Regenerated.
 597         * generated/sum_r4.c: Regenerated.
 598         * generated/sum_r8.c: Regenerated.
 599
 600 2008-01-05  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 601
 602         PR libfortran/34676
 603         * io/list_read.c (next_char): Only save the EOF condition for later if
 604         advance="no".
 605
 606 2008-01-03  Thomas Koenig  <tkoenig@gcc.gnu.org>
 607
 608         PR libfortran/34565
 609         * io/io.h:  Adjust protoypes for open_internal(),
 610         next_array_record() and init_loop_spec().
 611         * io/list_read.c (next_char):  Use argument "finished"
 612         of next_array_record to check for end on internal file.
 613         * io/unit.c:  Calculate the offset for an array
 614         internal file and supply this informatin to open_internal().
 615         * io/unix.c (open_internal):  Set the offset for the internal
 616         file on open.
 617         * io/transfer.c (init_loop_spec):  Calculate the starting
 618         record in case of negative strides.  Return size of 0 for
 619         an empty array.
 620         (next_array_record):  Use an extra flag to signal that the
 621         array is finished.
 622         (next_record_r):  Use the new flag to next_array_record().
 623         (next_record_w):  Likewise.