libgfortran/ChangeLog

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