libgfortran/ChangeLog

   1 2008-01-11  Thomas Koenig  <tkoenig@gcc.gnu.org>
   2
   3         PR libfortran/34670
   4         * m4/iparm.m4 (upcase):  New macro (copied from the m4 manual).
   5         (u_name):  New macro for the upper case name of the intrinsic.
   6         * m4/iforeach.m4 (name`'rtype_qual`_'atype_code):  Add
   7         bounds checking and rank check, depending on
   8         compile_options.bounds_check.
   9         (`m'name`'rtype_qual`_'atype_code):  Likewise.
  10         (`s'name`'rtype_qual`_'atype_code):  Likewise.
  11         * m4/ifunction.m4 (name`'rtype_qual`_'atype_code):  Add
  12         bounds checking and rank check, depending on
  13         compile_options.bounds_check.
  14         (`m'name`'rtype_qual`_'atype_code):  Likewise.
  15         (`s'name`'rtype_qual`_'atype_code):  Likewise.
  16         * generated/all_l16.c: Regenerated.
  17         * generated/all_l4.c: Regenerated.
  18         * generated/all_l8.c: Regenerated.
  19         * generated/any_l16.c: Regenerated.
  20         * generated/any_l4.c: Regenerated.
  21         * generated/any_l8.c: Regenerated.
  22         * generated/count_16_l16.c: Regenerated.
  23         * generated/count_16_l4.c: Regenerated.
  24         * generated/count_16_l8.c: Regenerated.
  25         * generated/count_4_l16.c: Regenerated.
  26         * generated/count_4_l4.c: Regenerated.
  27         * generated/count_4_l8.c: Regenerated.
  28         * generated/count_8_l16.c: Regenerated.
  29         * generated/count_8_l4.c: Regenerated.
  30         * generated/count_8_l8.c: Regenerated.
  31         * generated/maxloc0_16_i1.c: Regenerated.
  32         * generated/maxloc0_16_i16.c: Regenerated.
  33         * generated/maxloc0_16_i2.c: Regenerated.
  34         * generated/maxloc0_16_i4.c: Regenerated.
  35         * generated/maxloc0_16_i8.c: Regenerated.
  36         * generated/maxloc0_16_r10.c: Regenerated.
  37         * generated/maxloc0_16_r16.c: Regenerated.
  38         * generated/maxloc0_16_r4.c: Regenerated.
  39         * generated/maxloc0_16_r8.c: Regenerated.
  40         * generated/maxloc0_4_i1.c: Regenerated.
  41         * generated/maxloc0_4_i16.c: Regenerated.
  42         * generated/maxloc0_4_i2.c: Regenerated.
  43         * generated/maxloc0_4_i4.c: Regenerated.
  44         * generated/maxloc0_4_i8.c: Regenerated.
  45         * generated/maxloc0_4_r10.c: Regenerated.
  46         * generated/maxloc0_4_r16.c: Regenerated.
  47         * generated/maxloc0_4_r4.c: Regenerated.
  48         * generated/maxloc0_4_r8.c: Regenerated.
  49         * generated/maxloc0_8_i1.c: Regenerated.
  50         * generated/maxloc0_8_i16.c: Regenerated.
  51         * generated/maxloc0_8_i2.c: Regenerated.
  52         * generated/maxloc0_8_i4.c: Regenerated.
  53         * generated/maxloc0_8_i8.c: Regenerated.
  54         * generated/maxloc0_8_r10.c: Regenerated.
  55         * generated/maxloc0_8_r16.c: Regenerated.
  56         * generated/maxloc0_8_r4.c: Regenerated.
  57         * generated/maxloc0_8_r8.c: Regenerated.
  58         * generated/maxloc1_16_i1.c: Regenerated.
  59         * generated/maxloc1_16_i16.c: Regenerated.
  60         * generated/maxloc1_16_i2.c: Regenerated.
  61         * generated/maxloc1_16_i4.c: Regenerated.
  62         * generated/maxloc1_16_i8.c: Regenerated.
  63         * generated/maxloc1_16_r10.c: Regenerated.
  64         * generated/maxloc1_16_r16.c: Regenerated.
  65         * generated/maxloc1_16_r4.c: Regenerated.
  66         * generated/maxloc1_16_r8.c: Regenerated.
  67         * generated/maxloc1_4_i1.c: Regenerated.
  68         * generated/maxloc1_4_i16.c: Regenerated.
  69         * generated/maxloc1_4_i2.c: Regenerated.
  70         * generated/maxloc1_4_i4.c: Regenerated.
  71         * generated/maxloc1_4_i8.c: Regenerated.
  72         * generated/maxloc1_4_r10.c: Regenerated.
  73         * generated/maxloc1_4_r16.c: Regenerated.
  74         * generated/maxloc1_4_r4.c: Regenerated.
  75         * generated/maxloc1_4_r8.c: Regenerated.
  76         * generated/maxloc1_8_i1.c: Regenerated.
  77         * generated/maxloc1_8_i16.c: Regenerated.
  78         * generated/maxloc1_8_i2.c: Regenerated.
  79         * generated/maxloc1_8_i4.c: Regenerated.
  80         * generated/maxloc1_8_i8.c: Regenerated.
  81         * generated/maxloc1_8_r10.c: Regenerated.
  82         * generated/maxloc1_8_r16.c: Regenerated.
  83         * generated/maxloc1_8_r4.c: Regenerated.
  84         * generated/maxloc1_8_r8.c: Regenerated.
  85         * generated/maxval_i1.c: Regenerated.
  86         * generated/maxval_i16.c: Regenerated.
  87         * generated/maxval_i2.c: Regenerated.
  88         * generated/maxval_i4.c: Regenerated.
  89         * generated/maxval_i8.c: Regenerated.
  90         * generated/maxval_r10.c: Regenerated.
  91         * generated/maxval_r16.c: Regenerated.
  92         * generated/maxval_r4.c: Regenerated.
  93         * generated/maxval_r8.c: Regenerated.
  94         * generated/minloc0_16_i1.c: Regenerated.
  95         * generated/minloc0_16_i16.c: Regenerated.
  96         * generated/minloc0_16_i2.c: Regenerated.
  97         * generated/minloc0_16_i4.c: Regenerated.
  98         * generated/minloc0_16_i8.c: Regenerated.
  99         * generated/minloc0_16_r10.c: Regenerated.
 100         * generated/minloc0_16_r16.c: Regenerated.
 101         * generated/minloc0_16_r4.c: Regenerated.
 102         * generated/minloc0_16_r8.c: Regenerated.
 103         * generated/minloc0_4_i1.c: Regenerated.
 104         * generated/minloc0_4_i16.c: Regenerated.
 105         * generated/minloc0_4_i2.c: Regenerated.
 106         * generated/minloc0_4_i4.c: Regenerated.
 107         * generated/minloc0_4_i8.c: Regenerated.
 108         * generated/minloc0_4_r10.c: Regenerated.
 109         * generated/minloc0_4_r16.c: Regenerated.
 110         * generated/minloc0_4_r4.c: Regenerated.
 111         * generated/minloc0_4_r8.c: Regenerated.
 112         * generated/minloc0_8_i1.c: Regenerated.
 113         * generated/minloc0_8_i16.c: Regenerated.
 114         * generated/minloc0_8_i2.c: Regenerated.
 115         * generated/minloc0_8_i4.c: Regenerated.
 116         * generated/minloc0_8_i8.c: Regenerated.
 117         * generated/minloc0_8_r10.c: Regenerated.
 118         * generated/minloc0_8_r16.c: Regenerated.
 119         * generated/minloc0_8_r4.c: Regenerated.
 120         * generated/minloc0_8_r8.c: Regenerated.
 121         * generated/minloc1_16_i1.c: Regenerated.
 122         * generated/minloc1_16_i16.c: Regenerated.
 123         * generated/minloc1_16_i2.c: Regenerated.
 124         * generated/minloc1_16_i4.c: Regenerated.
 125         * generated/minloc1_16_i8.c: Regenerated.
 126         * generated/minloc1_16_r10.c: Regenerated.
 127         * generated/minloc1_16_r16.c: Regenerated.
 128         * generated/minloc1_16_r4.c: Regenerated.
 129         * generated/minloc1_16_r8.c: Regenerated.
 130         * generated/minloc1_4_i1.c: Regenerated.
 131         * generated/minloc1_4_i16.c: Regenerated.
 132         * generated/minloc1_4_i2.c: Regenerated.
 133         * generated/minloc1_4_i4.c: Regenerated.
 134         * generated/minloc1_4_i8.c: Regenerated.
 135         * generated/minloc1_4_r10.c: Regenerated.
 136         * generated/minloc1_4_r16.c: Regenerated.
 137         * generated/minloc1_4_r4.c: Regenerated.
 138         * generated/minloc1_4_r8.c: Regenerated.
 139         * generated/minloc1_8_i1.c: Regenerated.
 140         * generated/minloc1_8_i16.c: Regenerated.
 141         * generated/minloc1_8_i2.c: Regenerated.
 142         * generated/minloc1_8_i4.c: Regenerated.
 143         * generated/minloc1_8_i8.c: Regenerated.
 144         * generated/minloc1_8_r10.c: Regenerated.
 145         * generated/minloc1_8_r16.c: Regenerated.
 146         * generated/minloc1_8_r4.c: Regenerated.
 147         * generated/minloc1_8_r8.c: Regenerated.
 148         * generated/minval_i1.c: Regenerated.
 149         * generated/minval_i16.c: Regenerated.
 150         * generated/minval_i2.c: Regenerated.
 151         * generated/minval_i4.c: Regenerated.
 152         * generated/minval_i8.c: Regenerated.
 153         * generated/minval_r10.c: Regenerated.
 154         * generated/minval_r16.c: Regenerated.
 155         * generated/minval_r4.c: Regenerated.
 156         * generated/minval_r8.c: Regenerated.
 157         * generated/product_c10.c: Regenerated.
 158         * generated/product_c16.c: Regenerated.
 159         * generated/product_c4.c: Regenerated.
 160         * generated/product_c8.c: Regenerated.
 161         * generated/product_i1.c: Regenerated.
 162         * generated/product_i16.c: Regenerated.
 163         * generated/product_i2.c: Regenerated.
 164         * generated/product_i4.c: Regenerated.
 165         * generated/product_i8.c: Regenerated.
 166         * generated/product_r10.c: Regenerated.
 167         * generated/product_r16.c: Regenerated.
 168         * generated/product_r4.c: Regenerated.
 169         * generated/product_r8.c: Regenerated.
 170         * generated/sum_c10.c: Regenerated.
 171         * generated/sum_c16.c: Regenerated.
 172         * generated/sum_c4.c: Regenerated.
 173         * generated/sum_c8.c: Regenerated.
 174         * generated/sum_i1.c: Regenerated.
 175         * generated/sum_i16.c: Regenerated.
 176         * generated/sum_i2.c: Regenerated.
 177         * generated/sum_i4.c: Regenerated.
 178         * generated/sum_i8.c: Regenerated.
 179         * generated/sum_r10.c: Regenerated.
 180         * generated/sum_r16.c: Regenerated.
 181         * generated/sum_r4.c: Regenerated.
 182         * generated/sum_r8.c: Regenerated.
 183
 184 2008-01-05  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 185
 186         PR libfortran/34676
 187         * io/list_read.c (next_char): Only save the EOF condition for later if
 188         advance="no".
 189
 190 2008-01-03  Thomas Koenig  <tkoenig@gcc.gnu.org>
 191
 192         PR libfortran/34565
 193         * io/io.h:  Adjust protoypes for open_internal(),
 194         next_array_record() and init_loop_spec().
 195         * io/list_read.c (next_char):  Use argument "finished"
 196         of next_array_record to check for end on internal file.
 197         * io/unit.c:  Calculate the offset for an array
 198         internal file and supply this informatin to open_internal().
 199         * io/unix.c (open_internal):  Set the offset for the internal
 200         file on open.
 201         * io/transfer.c (init_loop_spec):  Calculate the starting
 202         record in case of negative strides.  Return size of 0 for
 203         an empty array.
 204         (next_array_record):  Use an extra flag to signal that the
 205         array is finished.
 206         (next_record_r):  Use the new flag to next_array_record().
 207         (next_record_w):  Likewise.